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-TITLE C2ZMSODO MS11-L/7M DIAGNUSTIC 


-ENABLE LC 
.RE™ 
IDENTIFICATION 
PRODUCT CODE: AC -F 2940 -MC 
PRODUCT NAME : CZMSDDO MS11-L/M Diag 
PRODUCT DATE: Jenvery, 1982 
MAINTAINER: Diagnostic Engineer ing 


Tre information in this document is subject to change 
without notice and should not be construed es 8 commitment 
by Digitel Equipment Corporet ion. Digi tel Equi pment 
Corporetion eseuvmes no responsibility for any errors that 
may eppeer in this manuel. 


Tre software described in this document is furnished to the 
purchaser under ea license for use on es single computer 
system end cen be copied (with inclusion of Digitel’s 
copyright notice) only for use in such system, except as may 
otherw:se be provided in uriting by Digitel. 


Digitel Equipment Corporetion eseumes .o responsibility for 
the use or ro etek of its software on equipment that is 
not supplied by Digitel. 


COPYRIGHT (C) 1979,1982 Digitel Equipment Corporation 
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REVISION HISTORY 


DATE 
01-DEC 79 
01-OCT-80 


01-APR -81 


14 -DEC -81 


AUTHOR 
Micheel 0D Bibeault 
Micheel 0D Bibeault 


Michael 0D Bibeault 


Micheel D Bibeault 


CHANGE S 


None*New Program 
Changes to Sizing Routine 


1) Compatible with 11/24 

2) Siz routine will accept ali 
l memory configurations 

3) All Field Service Commands 
operative 


Cnanges made to feild Ser.ice 
Command 5 


LU i 
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59 OPERATIONAL SWITCH SETTINGS 
60 SWITCH REGISTER DEFINITIONS 
6) * 
. ° SWITCH USE 
65 BR. . + ele ewe beceeecseaauean 
“4 * is HALT ON ERROR 
65 * 14 LOOP ON TEST 
oe * i3 INHIBIT ERROR TYPEOUTS 
67 * l2 INHIBIT RELOCATION 
08 . il QUICK VERIFY 
69 . 10 BELL ON ERROR 
70 e 9 LOOP ON ERROR 
71 . a HALT PROGRAM (UNRELOCATED & RESTORE LOADERS) 
72 6 7 DETAILED ERROR REPORTS 
73 . 6 INHIBIT 1 CONFIGURATION MAP 
74 e 5 LIMIT MAX ERRORS PER BANK 
75 © 4 FAT TERMINAL (132 ae OR BETTER) 
76 . 3 TEST MODE - SEE DOCUMENT 
77 6 2 TEST MODE - SEE DOCUMEN;: 
74 e 1 TEST MODE - SEE DOCUMENT 
79 * 0 DETECT SINGLE BIT ERRORS 
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GENERAL PROGRAM INFORMATION 


Program Purpose (Abstract ) 


7 ree for use on ell PDP-11's which meet the conditions in 


This program will be used by system managers and operators to 
determine the correct operation of main memory and also it will 
be primarily ueed by field service and manufacturing to isolate 
feilures to the memory and to isolate failures within the memory 
to the correct card. 


. Tne object of this software is to functionally test and verify 


ell main memory functions es fast as possible 


Tnere is the of testing mixed configurations (MSLi-L, 
MS11-M and whet ever else in on the system). 


. It nes special ea sore om (Field Service Mode) to provide 


specific functione) capebilitiec. 


System Requirements 


1.2.1 Hardware Requirements - 


POP-11 CPU and at least 64K (16 Bit words) of Memory and 
Memory Management . 
NOTE 


Like memory types must be on 16K word boundaries 
sterting et physicel address 0 


Gl 
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175 is 4 
174 Qe 
176 1.2.2 Software Requirements - 


178 This progrem is designed to run stand slone o- under any of the 
179 following moritors: 


i61 xXDP 


182 ACT 
185 APT 


187 1.3 Related Documents And Standards 


POP -11/04/34/45/55/60 Processor Handbook (£89340) 
PDP -11/44 User's Guide (EK-11044-UG) 

MS11-M User's Guide (EK-MS11M-UG-001) 
Programming Practices (175-003-009-02) 

System Macro Manual (MAINDEC-11-OxQAC-C-D) 
SUPER-MAC Reference Guide (130-380-007-00) 


. Standard APT System to POP-il Diagnostic Interface 
203 (APT/11-317-07-09 


ACT1I1/XXOP Programming Specification (AUTOCAT -11-GZAUB-B-D) 


os 
z 
~ oy Pp eNr 


; 


210 1.4 Diagnostic Hierarchy Prerequisites 

212 If the program in any way misbehaves, then: 

. Try it egain with Cache off (reference Section 2.4.3.1) 
Inhibit relocation (reference section 2.4.1) 

Try CPU Diagnostics 

Try Memory Management Di agnostics 

Try Cache Diagnostics (where applicable) 

Try UNIBUS Map Diagnostics (where applicable) 


tv 
3 
ov ee PS 
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1.5 Assumptions 


This progrem assumes the correct operation of the 


Management, Cache, and the VUNIBUS Map. This program occup es 
(initially) Bank O (0-16). Tre *xXDP loaders are in bank |. 


2.0 OPERATING INSTRUCTIONS 
2.1 Loading E— Starting Procedures 
2.1.1 Quick Sterting - 


Load address 200 
2. Set switch register for options (normally 0) 
Start 


NOTE 
If on an 11/24 using MS11-L Memory BE 
SURE thet the peripheral page jumper is 


in plece; feilure to do so sends the 
diagnostic to Never -Never Land. 


2.1.2 Stopping - 
1. Set SW8, and/or 


2. Type control "“C” (Reference section 2.4.4.1). 


2.1.3 Restarting (Preserve Corfiguration Table) - 
1. Load address 202 
2. Set switch register for options (Normally 0) 
3. Start 


SEQ ANCE 
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284 v +, 
285 _ 
28 

287 2.1.4 Switch Register Optiors 

288 

<89 SWITCH USE 

ee Caer oe ee | Siege oye Es ei aiep aire ene meee tee 

291 

292 iS HALT ON ERROR 

29s 14 LOOP ON TEST 

98 i3 INHIBIT ERROR TYPEOUTS 

295 12 INHIBIT RELOCATION 

296 11 QUICK VERIFY 

297 10 BELL ON ERROR 

298 ‘a LOOP ON ERROR 

299 8 HALT PROGRAM eee & RESTORE LOADERS) 
300 7 DETAILED ERROR REPORTS 

301 6 INHIBIT CONFIGURATION MAP 

302 5 LIMIT MAX ERRORS PER BANK 

305 4 FAT TERMINAL (132 aes OR BETTER) 

304 3 TEST MODE - SEE DOCUMENT 

305 2 TEST MODE - SEE DOCUMENT 

306 1 TEST MODE SEE DOCUMENT 

507 0 DETECT SINGLE BIT ERRORS 
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309 Vage 
310 
311 
te 2.2 Default Test Sequence 
1 
514 | 
315 Tne following two lists give the test protocol for parity and ECC 
516 pau” f Tests marked with a “*" are not normally run except under ACT 
317 or T, or through 3 Field Service Command (Reference Section 
318 2.4.4 
519 
320 
321 
ast 2.2.1 Test Protocol For Parity Memory - 
324 
as Pattern Pattern Name Time (sec/16K ) 
327 Ry.) Soft Error Test <1 
328 6 Initiel Date Test «1 
329 17 Holding 1's and O's Test <1 
330 7 Address Bit Test <1 
331 1 Address Test <1 
332 2 Complement Address Test <1 
333 3 3 XOR 9 Test | 
334 4 Rotating O's Test i 
335 be Rotating 1's Test 1 
336 2i Marching 1's and 0's Test 1 
337 35 Worst Cease Noise Parity Test n/a 
338 * 22 Refresh Test 10 
339 e 23 Shifti Di 1 Test 10 
340 26 Random Dete lest <1 
341 e 24 Fast Galloping Pattern Test 20 
342 e 31 Sob-a-long Test 3 
343 e 32 Write Recovery Test <1 
344 e 33 Branch Gobble Test 35 
345 34 Soft Error Test <1 
346 
347 
3548 
349 


rh 
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2.2.2 Test Protocol For ECC Memory 


eee 


Pattern 


5 
25 
11 
le 
13 
14 
15 
16 
34 

€ 
10 
17 

7 

1 

2 

4 

5 
21 
20 
22 
26 
24 
31 
33 
34 


Pattern Name 


Rotating 1's Test 

Interrupt Enable Test 

Single Bit Error Test 

Write Byte Clears SBE Test 
Create le Bit Error Test 
Write Inhibit DATIP w/DBE Test 
Write Inhibit of Byte w/DBE Test 
Write Inhibit of Word w/DBE Test 
Soft Error Test 

Initiel Dete Test 

Byte Address Test 

Holding 1l‘s and O's Test 
Address Bit Test 

Address Test 

Complement Address Test 
Rotating O's Test 

Rotating 1's Test 

Marching O's and i's Test 
Marchin O's and i's in CB's Test 
Refresh Test 

Random Date Test 

Fast Galloping Pattern Test 
Sob-a-long Test 

Write Recovery Test 

Branch Gobble Test 

Soft Error Test 


SEQUENCE 


Page 4 


Time (sec/l6" ) 


A AAAAAA A 


Oh bt bb tt tb 


A 


Ay 
re 


20 


@ - Run only on the first Pass when under ACT or APT 


. 


- Rum twice for each 16K Bank if Interleaved 


® - Run only for MF11S-K 


At the end of each Pass the program will run cleanup Patterns 
030, and #27 for ell benks. 
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2.3 Special Environments 
2.3.1 XxXOP - 


The first pass will be @ quick verify pass f and only if it is in 
chain mode. 


2.3.2 ACT & APT Automatic Mode - 


The program will not create double bit errors (O0BE‘s) after tne ist 
pess. 


2.3.2.1 APT Execution Times - 


— are some measured execution times for an 11/44 with cache under 
ist QV Pass 2nd Pass & onward 

128K MS11-M (non-interleaved) 10 min 15 sec 7 min 40 sec 

128K MS11-L 9 min 50 sec 7 min 30 sec 

256K MS11-M (interleaved) 19 min 50 sec 14 min 45 sec 


The first pass will be a quick verify pass 


NOTE 


Even though the first pass is a QV pass 
it tekes longer than the subsequent 
non-QV pesses due to the fact that it is 
running more patterns, some of which 
(patterns @24 and 933 for example) can 
be extrememly time consuming. 


CZMSDDO MS11 
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2.3.2.2 APT Environment Table - 


The following table gives some of the standard settings for the AP’ 
E-Table. They may be modified as noted as the user sees fit. 


FIRST PASS RUN TIME: 

This perameter should be set according to the amount and type of 
memory to be tested. The above table (APT Execution Times) gives some 
measured times. For any patterns deleted (through use of the Device 
Descriptor Words) reference section 2.2 for individual pattern times. 


NOTE 


The times given in section 2.2 are for 
16K chunks of memory, not 128K boards! 


LONGEST TEST TIME: 
This pearemeter should be set to the execution time of the longest 
oe ae'ee run. for the default case this is 35 seconds for 
ettern 655. 


ADDITIONAL RUN TIME: 
Not Used By Program. 


SOF TWARE ENVIRONMENT: 
For APT auto mode this parameter should be set to a "1". For 
Gum mode set this to a “0”. 


ENVIRONMENT MODE : 

When this peremeter is set to a "0" the program does it’s own 
Sizing. If the users sets bit @7 however, he must specify the types 
ang amounts of memory to be tested. 


SWITCH 1: 

The default setting of this switch is "101". APT uses this as 
the switch register for the program. Reference section 2.4.1 for more 
information on switch settings. 


SWITCH 2: 

This gwitch, if set to any non-zero number, is used to limit the 
amount of passes APT will make. The progrem will hang after this 
count has been reached. 


CPU OPTIONS: 
Not Used By Program. 
MEMORY TYPE n (n*1 to 4) 


If bit @7 of ENVIRONMENT MODE is set these four words sre used to 
log the different types of memory to be tested. If bit #7 is not set 
these location are not used. 


_f ak Nt 


Ni 
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509 MAXIMUM ADDRESS n (n=1 to 4) 


v 
fa. 


ee ee 
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Pege i) 


Tnese four words ere used in conjuntion with the correspond ng 
MEMOS: TYPE words to indicate the hignest address that memory, toe 
occupies. 


NOTE 


Tre above two peremeters do not actuslly 
neve to represent ar eccurete 
configuration of memory. Ail tre 
progres looks for is an accurate tally 
of memory amount! 


INTERRUPT VECTOR n (nel to 2) 
Not Used By Progress. 


BUS PRIORITY n (n=l to 2) 
Not Used By Progra. 


BASE ot a 
Not Used By Program. 


DEVICE MAP: 
Not Used By Progre-. 


CONTROLLER DESCRIPTOR CODE n (n*1 to 2) 
Not Used By Progras. 


DEVICE DESCRIPTOR CODES: 

Tre Device Descriptor codes ere used by the program to determine 
which petterrs it will run. The default valuse of these words sre el! 
“1"’s, indicating that ell of the petterns smom in section 2.2 are 
executed (seve for exceptions es noted there). Each set of words 
controls ea table in the program eas follows: | 


DD WORDS PROGRAM TABLE (Symbolic location) 

Words 0-1 M<CSRT 

Words 2-3 MKPAT 

Words 4-5 MJPAT 

Bit #0 set in the first word indicates that the first pattern in the 
teble will be executed, bit @1 the second, bit @2 the third,... bit 


0 of the second word indicetes that the 17th entry in the table will 
be executed, and so on. 


UO 1 AioN 
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2.35.5 No SBE Free Banks - 


If the program cannot find any SBE (Single Git Error) free locet' ons 
(im non-protected ECC memory) ‘it will print out an error message ard 
continue testing by passing tne ECC logic tests. 


2.5.4 Mixed Perity &€ ECC Configurations 


Tre program will function normally in mixed environments. Tne 
sequence of testing may seem strange due to the recursive test sode 
aigorithm (reference sections 2.4.1.1, 2.4.1.2, & 2.4.1.3). 


i 
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P ’ 
sae ove 
oes : 

5 2.4 r am Opt ions 
cae ogr 
Sa’ 
Fy = 2.4.1 Smiter Register Dete' ls 
s If @ herdwere switch register is not ave lable then the software 
591 Suitch a pe is im locetion 176. IF under APT ‘f BIT’ is set ‘n 
$92 the E-TABLE s lic location "SENVM” the APT software switch regi ster 
a «ill be used (location sSWREG). 
595 To change the softwere switch register contents: Type “control G’. 
596 Tris will cavee display the current velue of the SW and prompt for 
597 the octal input of tne new SWR value from the terminal. This routine 
598 will ignore you (not respond to control "G") if you nave a nardware 
599 Suitch register. 
600 
601 Sw1i5 * HALT ON ERROR 
602 ( 100000 ) 
603 
604 (page ieee from this halt will first check for oe ch 
605 in the software ewitch register (“Control G” in tne Tir 
yrs: input buffer) ther it will continue testing. 
608 Swi4 = LOOP ON TEST 
609 (40000 ) 
610 
6i1 This will cause looping on the present test or pattern 
612 (beck to lest scope trap). If in a pattern then the 
rz looping will be for an entire bank of 16K addresses. 
615 Swiss = INMIBIT ERROR TYPEQUTS 
616 ( 20000 ) 
617 
618 Tris will cevee returns from the error routine without 
619 the typed messages. Other on error functions are not 
rey affected. 
622 S12 « INHIBIT RELOCATION 
625 € 10000 } 
624 
625 This prevents the progrem from moving end consequently 
626 prevents the program from testing at least 32 of 


627 MOMOry . 
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= QUICK VERIFY 
(4000 ) 
If this ewitch i6 selected appro i mate! one 64th of 
the possible combinations of SBE‘s & ‘$s are tested. 


Each pess complete typeout will indicate this mode ob, 
preceding the pass cumber with “Gv". 


* BELL ON ERROR 
(200) ) 
Tris causes ea bell (or beep or click) on each error 
trep 


= LOOP ON ERROR 
(1000 } 


Thies will cause looping from failure point back to tre 
lest correctly initielized area of the current test. 


* HALT PROGRAM 
(400) 
Tris initiates the following sequence: 
1 If progrem is relocated it moves back to bani zero. 
2. Filwen out ell possible OBE's. 
3. Turns off Memory Menagement. 
4. Restore loaders. 
5S. Unmap the Unibus Map (if there is one). 
6. Welt if under APT or ACT branch sel. 
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674 
675 
676 
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DETAILED ERROR REPORTS 
(200) : 


After any cormal error report is typed this opt’ on 
causes the contents of the following registers to be 


typed: 
RO, R1, R2, R3, R4, RS, SP, “CONTROL”, “CPUERR: 


INHIBIT CONFIGURATION MAP 
(100) 


This inhibits the printing of a map showing the memor, 
configuration - reference section 7.3 


LIMIT MAX ERRORS PER BANK 
(40) 


FAT 


Tris will Limit the number of error typeouts per bark. 
Tre default ‘s 10. DECIMAL, Nowever this can be 
changed by cranging locetion “ERRMAX” manuaily. 


TERMINA 
(20) 


This informs the ty thet the conscle terminel has 
@ width of et least 132 columns (A356 with wide paper). 


SE GUE NCE 
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TOl Page if 

702 

ros 

704 Sw3-1 « TEST MODE 

705 

706 Test modes determine the recurs or algorithm to be used 
'O? Guring pattern tests. 

"08 

729 MODE NAME DESCRIPTION 

710 

"21 (0) 0 BAF PAF Banks forward, patterns forward 

712 (2) i BAF PAR Banks forwerd, patterns reverse 

713 (4) 2 BAWPAF Banks worst first, petterns forward. 

714 (6) 5 BAWPAR Barks worst first, petterns reverse. 

715 (10) 4 PAF BAF Patterns forward, benks fornerd 

716 (12) 5 PAF BAW Patterns forward, banks worst first 

717 (14) 6 PARBAF Patterns reverse, banks forwerd 

718 (16) 7 PARBAW Patterns reverse, banks worst first. 

73 

720 For more details reference section 2.4.1.1, 2.4.1.2 and 
us 2.4.1.5. 

723 SWO = DETECT SINGLE BIT ERRORS (SBI‘s) 

724 (1) 

725 

726 For manufecturing purposes this switch should elways be 
727 on. For field service purposes this switch should 
i alweys be off. 

730 Tris ewitch will ellow all ECC Single 8:it errors to be 
van reported by disabling error correction. 

733 Error pr:ntouts of SBE's ere not distinguisnable from 
734 DBE’ s. 

735 

7% 

737 NOTE 

738 

739 If Dowble Bit Errors ere found ir the memory, 

740 this ewitch should be set to make sure that nen 

mas date cen be aritten to the DBE locetions. 
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2.4.1.1 Test Mode Example 


a enelys: is of mode 5S “PAFHAW. Asgeume Barks O € 1 are MS1L1 
and Banks 2,°,4,.6 5 are MS1LI-™. 


Assume also that Genk 5 is known bad by the program via the sizing 
routine or previous runs The testing sequence would be as follows: 


sTEST MS11-M MEMORY TYPES FIRST 
; TEST KNOWN BAD MEMORY (BANK 5) 


PATTERN 17, 3 
PATTERN 7, 

PATTERN 1, 6 ANK 
PATTERN 2, BANK 
PATTERN 4, BANK 
PATTERN 5S, 
PATTERN 21, 
PATTERN 20, BANK 
PATTERN 22, 
PATTERN 26, 


i; TEST PRESUMED GOOD MEMORY (BANKS 2,4,5) 
PATTERN 17, 


PATTERN 7, 
PATTERN 1, 


i Ue 


a 


a 






v 

eS 

~ 

3 
ViiVUIUVIVUUIUUI a PaaS A LS Hf fof ferfty 


PATTERN 26, 


bs 
a bre 


=) 


pt fit ot 


meses 


eae 


a 


be teh 
ad 
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sRELOCATE &€ TEST PROGRAM SPACE (BANK O £ i) 


PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 
PATTERN 


rd utere wow 


F 
meee re §OOO0COCO 


NOTE 


This is ean example E not an actual 
sequence. 
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Tne pattern sequence was forward (the simple patterns first, comole 
patterns lest) sequence of patterns (MS11-M - 17, 7, 1, 2, 4 %, 21, 
20, 22. 26 )(MS11-L ° - Me 3. 4, ae 26) 


If the ban« selection is forward the banks will be tested inthe 
following order: 


1. x ane thet ere not protected or program space (from 0 to 


2. Parity benks that ere not program space (from 0 to 200). 
The program now relocates € tests: 


4. Raa thet were protected or program space (from 0 to 


5S. Parity banks that were program space (from 0 to 200). 


If bank selection is worst first the configuration table will be 
consulted and banks will be tested in the following order. 


1. ECC banks that ere known bad and are not protected or program 
space (from 0 to 200). 


2. Parity benks thet are known bad and ere not program space 
(from 0 to 200). 


3. ECC banks thet ere presumed and ere not protected or 
program space (fan 0 to 200 


4. Perity barks that ere presumed good and are not program space 
(from 0 to 200). 


5S. The program now relocates € tests: 


6. ECC banks that ere known bad and were protected or program 
spece (from 0 to 200). 


7. Parity banks that ere known bed and were program space (from 
0 to 200). 


8. ECC barks thet ere presumed good and were protected or 
program spece (from 0 to 200). 


9. Parity benks that ere presumed good and were program space 
(from 0 to 200). 


EQUENTE 
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Test Mode Details 
s “Bar Par - banks forward, patterns forward 
This is the default and simplest mode. 


This mode tests each bank completely from 0 to 
except those requiring relocations. 


While testing each bank the petterns ere run with 
simple ones first building to the more comple«. 


= “BAFPAR” = banks forward, patterns reverse 


This mode tests each bank completely from 0O to 
except those requiring relocations. 


While testing each bank the patterns sre run with 


most complex ones first, working to the simple ones. 


= “BAWPAF” = Banks worst first, patterns forward 


200 


tne 


200 


the 


This mode first tests each known bed benk completely 
from 0 to 200 except those requiring relocations, then 
presumed good benks ere tested from 0 to 200 except 


those requiring relocations. 


While testi each bank the patterns ere run with 
simple ones first, building to the more complex. 


= “BAWPAR” = Genks worst first, patterns reverse 


the 


Thies mode first tests each known bad bank completely 
from O to 200 except those requiring relocations, then 
presumed good banks ere tested from 0 to 200 except 


those requiring relocations. 


While testing eech bank the petterns ere run with the 
most complex ones first, working to the simple ones. 


= “PAFBAF” = Patterns forward, banks forward 


This mode tests each pettern completely with the simple 


ones first, building to the more comple. 


While testing each pattern the benks ere run from 0 


200 except those requiring relocations. 


to 


SE GENCE 
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"PAFBAW” + Patterns forward, banks worst first 


This mode tests each pattern completely with tne «imple 
ones first, building to the more complex. 


While testing each pattern first each known bed bans 
from O to 200 except those requiri relocetionse is 
run, then presumed good benks ere run rom 0 to 200 
except those requiring relocations. 


“PARBAF” « Patterns Reverse, Banks forward 


This mode tests each pettern completely with the most 
complex ones first, working to the simpie ones. 


While testing each pettern the banks are run from 0 to 
200 except those requiring relocations. 


“PARBAW” = Patterns Reverse, Banks Worst First 


Tris mode tests each pattern completely with the most 
complex ones first, working to the simple ones. 


While testi each pattern first each known bad bank 
from 0 to except those thet require relocations is 
run, then presumed good benks ere run from OO to 200 
except those requiring relocations. 


NOTE 


* Relocation ‘¢ regsired to test the 
bark(s) in progras espece and also to 
test any ECC banks protected by 
diegrostic checkmode with the inhibit 
mode pointer off (zero)! 
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Test Mode Applications - 
To verify correct operation of the memory system use Mode 0 
“BAFPAF ”. 


Advantages: Easy to understand. 


Disadvanteges: In case of a failing Bank, it may take a long 
time to find the failure. 


To get detailed error information on known bad Banks (found 
by sizing routine) use Mode 2 “BAWPAF”. 


Adventeges: Seeks Bad Banks. Easy to understand. 


Disedvanteges: Failures other than zeros E ores may take oa 
long time to find. 


= ee error info on any memory problem fast use Mode 4 


Advantages: Covers all banks fast. Easy to understand. 


Disadvantages: Feilures from only complex patterns may take 
e long time to find. 


To find any problem fast use Mode 7 "PARBAW”. 
Advantages: Covers all Banks fast. 


Disadvantages: Difficult to understand failures reported are 
not necessarily the most basic failure modes. 


2E QUENCE 
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2.4.2 Display Register 
A software di spiay ieter exists in location 174 'n addition to aw, 
hardware display e«istence. 
Diepley *'elds ere as follows: 

> i a Se Gee > a) ee 9 Se? 7 é S14 , 2 l 
Reloceted ! Berk @ ' Not Useo ' Pattern © 

x ‘ 7 


PATTERN @ « Tre number of the pettern presently ce: rum. All 
petterns ere deecribed in section 6.2. y pettern can be 
found in the ao: by Looking up the symbolic Tags 
“MTOONN” and “MT “ .- gnere “NN” is the Pettern number. 
MTOONN refers to the routine thet sets up for the test 
Pettern whereas MTPONN ‘6 the actual petterr tself. 


NOTE 


Tre pattern © is not necesserily an 
indication of degree of difficulty. 


BRN = Tre number of the Bank (16%) of memory under test (0-200). 
these bits directly map to physicel seddress bits (21:15). 


RELOCATED = This bit indicates thet the progres is relocated and no 
longer in Berk 0. It will Be reloceted to the first 
known good non-protected memory, bank indicated 
the configuration map (reference section 7.3). 


NOTE 
Another way to obtein this information 


ise to type ea CONTROL/T et the console 
(reference Section 2.4.4.5). 


2.4.3 Special Memory Locations - 


* 


_ 
’ * 
' 
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106° 2.4.3.1 CACHE Constant 


1069 Tre CACHE constant is located sat symbolic location “CACHK and « used 
1070 to enable CACHE. 


107 NOTE 


1076 Bit O in the CACHE constant nas no 
1077 effect since it is unconditionally set 
1078 by the program whenever it tries to 
1079 enable CAC 


1065 2.4.3.2 Configuretion Table 


1087 Tre configuration teble is located st symbolic location “CONFIG” and 
1088 hes the following format: 


1090 CONFIG: First 16K Configuration words (2 each) 
1091 2nd ss 16K ~ Configuration words (2 each) 


1093 200th 16K ‘conf i guration words (2 each) 


i Configuration Words: 
1096 LOW: BIT O ERRORS PRESENT 
i MEMORY EXISTS 
2-4 RESERVED 
5 SKIP ECC LOGIC TESTS FLAG (1. °SKIP) 
1100 BIT 6 PROTECTED REGION OF AN ECC MEMORY 
‘ PROTECTED (PROGRAM SPACE >) 
i 
0 
8 


-11 CSR CODE 
2-15 INTERLEAVED CSR CODE 
- NUMBER OF ERRORS 





E 

“BACKGROUND PATTERN VALID’ FLAG 

09 BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 
LOADERS HOME BANK 


Tris table is used es the source for the confi guration 
Map (reference. section 7.3). 
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Terminal Commands . 


Control "C” 


Tris command will: 


iL. 


Co uv & Ww | 


Fs 


If Switen 8 (Halt Program) in the ewitcnm register s+ set nalt 
the program. 


If Switch 8 is not set, unrelocete if program nas relocated. 
Flush out any DBRE's. 

Turn of f Memory Management. 

Attempt to Boot RKOS Drive 0. 

Failing 4, attempt to Boot RKO4 Drive 1. 

Failing 5. go to 4. 


This command will only be recognized at the completion of tne current 
test or pettern, or set the end of a line of an error message. 


2.4.4.2 Control “D” (Debug) 
This command to enter eae modified version of ODT has been deleted. 


2.4.4.3 Control “E” (procEEd) 


This command would sallow you to exit OOT. It is hes also beer 
deleted. 


2.4.4.4 Control "K" (Kill error printout and skip pattern) 


This command will ellow you to stop an error printout and skip to the 
next pettern. This is handy, for exemple. when you have a whole bank 
full of errors, heave gotten enough information, and wish to skip to 
the next pettern. 
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2.4.4.5 Control "T” (Tell me what's nappening) 

Tris command wiil print out the information enccded in tre 4d sola, 
register. Tris ‘Ss mainly intended for CPU's without » hardware 
displey register. 

Example: 

RELOCATED BANK= 23 PAT= 26 

By use of Field Service Commend 17 “Trace” can be set so that ¢ «li 


automatically type out the bank and pattern numbers as each patterr (s 
run. (Reference section 2.4.4.8.18). 


2.4.4.6 Control “S” (Stop) 
This command will stop typeout (soon) and will wait for a Control “Q”. 


2.4.4.7 Control “@" (Quint inue) 


Tris command will continue typ: that hes been stopped by Control 
“e".. If there hes beer no Control “S” typed then this command is 
ignored. 
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2.4.4.8 Control “fF” (Field Service mode ) 


Tris command will cause you to enter ea mode «hich looks for «ub 
commands. 


When the program is looking for @ sub command any number that ‘s not a 
legel command nik ceuse a mini help message to be tyced. ‘Therefore 
when in doubt type 99 (CR) and you will get nelp. 

NOTE 


Typing just cerriage return is a default 
command 0. 


2.4.4.8.1 Field Service Command 0 (Exit) 


This command will exit Field Services Mode and return to whetever tesk 
it wes in prior to typing control “F". Note typing just carriage 
return is e defeult Command 0. 


2.4.4.8.2 Field Service Command i (Read CSR) 
Tris command will typeout the contents of the CSR. 


If there is more than one CSR on the CPU (or if the progres hes not 
determined the CSR stetus yet). it will Ask you “WHICH CSR(O-F)” to 
which you gust respond with an Hexidecimal number from 0 to F. Note 
typing just cerriege return is ea default 0 


If the CSR ote select causes a trap to 4 the progrem will type “THIS 


CSR DOES NOT EXIST”. 


NOTE 


CSR references ere done in accordance 
with section 5.0. 


ADEN 
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2.4.4.8.35 Field Service Command 2 (ioad CSP) 

This command will enable you to load the CSR. 

If there is more than one CSR on the CPU (or if the program nas not 
yet determined the CSR status yet) it will ask you “WHICH CSR(O-F >” to 
which you must respond with an Hexidecimel number from 0 to Ff. Note 
typing just carriage return is a default O. 


If the CSR you select causes eo trap to 4 the program will type “THIS 
CSR DOES NOT EIST”. 


Tre CSR will be read and displayed as in command 1. 
The program will tnen ask you for the “CSR” to which you must respond 
a an Octel number. Note typing just cerriage return ‘s e default 


Tre program will then load the CSR and Read it again displaying its 
nen contents. 


2.4.4.8.4 Field Service Command 3 (Examine Memory ) 


This command will allow you to examine any physical sddress and does 
the necessary memory management mapping for you. 


The program will esk you for the “PHYSICAL ADDRESS (0-17757776)”" to 
which you must respond with an Octel number. 


If the eddress eccess cevses 6 trap to 4 the program will type 
“TIMEOUT TRAP”. If the address access causes ea trap to 114 the 
program will type “PARITY ABORT”. 


Tre contents of your physicel address will be typed. 


1301 


Sseseeee 


2.4.4.8.5 Field Service Command 4 (Modify Memory » 


Tris command aliows you to modify any physical address and does tre 
necessary memory management mapping for you. 


The progrem will sek you for the “PHYSICAL ADDRESS (0-17757776) to 
which you must respond with an Octel number. 


If the address access cevses 8 trap to 4 the program «(ll type 
“TIMEOUT TRAP”. If the eddress eccess caevses «6 trap to i114 the 
progrem will type "PARITY ABORT”, 


Tre program will type “OLD DATA WAS” and the contents of your physica: 
eddress. 


The program will then type “INPUT NEW DATA” to which you must respond 
ee an Octei number. Note typing just carriage return ‘s e defauit 


The progrem will attempt to write this new date into oe prysical 
address after which it will read it again and type “DATA IS NOW” and 
the new contents of your physical address. 


NOTE 
If you can't change the data, that would 


indicate thet you have ea Double Bit 
Error in that double word pair. 


4 
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.oos 2.4.4.8.6 Field Service Command 5 (Select Bank & Pattern) 

1 e 

00 Tris command eliows you to run any bank with any pattern forever. 

i331 

1332 Tre program will esk you “BANK( 0-200)" to which you must respond «' th 
1333 ean Octal number. f the bank is not accessible. ‘he program « 1! 
07 type “BANK NOT ACCESSIBLE” and ask question over. 

i355 

1336 The progrem will then ask “PATTERN (0-37)" to which you must respond 
1337 with en Octel number. 

1338 

1339 

15340 NOTE 

1341 

1342 Any pettern can be run including § those 

1345 thet ere not pert of the APT E-TABLE 

1344 defaults (reference section 6.2.1). If 

1345 you select Pattern 0, the progrem will 

1346 esk “PATTERN O DATA IS?” to which you 

44 must respond with an Octel number. 

i 

1349 

i350 

1351 If the Bank roe selected requires relocation the program will type 
1352 “BANK REQUIRES RELOCATION” and exit this command. Note normally this 
pos is true for Bank O. 

1355 Tre em will then arm the console keyboard for interrupts and type 
a “TO ESC TYPE ANY KEY!”. 

1556 Tre test pettern will be entered and run until ae console «ey is 
1359 depressed to escape this loop. 
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2.4.4.8.7 Field Service Command 6 (Type Configuration Map) 
Tris command types the configuration map. 


Tris ‘6s useful after a long run (overnight) to see all the banks that 
ere marked as bed. Clepeeleily if your console is a video terminal). 


For a detailed explanation of the map reference section 7.3%. 


é.4.4.8.8 Field Service Command 7 (SOB-A-LONG TEST) 


This command ellows execution of the SOB-A-LONG Test on sil 
non-protected Banks reference Section 6.2.2.26. Operation is 
identicel to command 5 except that no Pattern or Bank s entered and 
each pass ceuses a Bell. 


,- a ince 
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2.4.4.8.9 Field Service Command 6 (Error Summary ) 


This command types out the number of passes and the total number of 
errors. If there were any errors it will type out the Banks and the 
number of errors per bank up to 255 DECIMAL. 


This becomes useful after long runs (all night) on systems with «a 
video console terminal. 


2.4.4.8.10 Field Service Command 9 (Refresh TEST) 


This command ellows execution of the Refresh Test on all non-protected 
Banks reference Section 6.2.2.19. Operation is identical to command 5 
except thet no Pettern or Bank is entered and each pass causes oa Bell. 


2.4.4.8.11 Field Service Command 10 (Set Fill Count) 


This commard allows setting of the terminal fill count (necessary for 
LASO’s, ASR33's. and VTOS's). It is normally set to zero for LA36's, 
VTS2‘s, VT1L00's, etc. 


2.4.4.8.12 Field Service Command 11 (Enter Kamikaze Mode) 


This command ellows ev to run patterns thet are normally not executed 
unless under APT or . They are veually very time consuming and can 
result in failures thet ere fatal to the program. In effect you ere 
tryi to find e herdwere failure regardless of the consequences. 
Note t most crashes do not wipe out the display information which 
is telling you whet the program wes -—- Ppa prior to fai lure. 
There ere two ways to die here - Impatience reshes. 


2.4.4.8.15 Field Service Command il2 (Exit Kamikaze Mode) 
Return to the default mode of testing (undo Command 12). 
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2.4.4.8.14 Field Service Command 13 (Turn Cache OFF ) 


ees aaa the Cache constant .o bypass cache (reference section 


2.4.4.8.15 Field Service Command 14 (Turn Cache Ur) 


Mea has sia the Cache constant to use cache (reference section 
> . eS . 


2.4.4.8.16 Field Service Command 15 (Test Only Selected Banks) 
Tris command ellows you to center the test effort on only those banks 


thet you ere troubleshooting. You may also test banks that require 
relocation and were ineccessable vie command 5. 


2.4.4.8.17 Field Service Command 16 (Resume Testing All Banks) 
Return to the default mode of testing (undo Command 15). 


2.4.4.8.18 Field Service Command 17 (Resume Testing All Banks) 


Enable “Trace”. After exiting field service mode, the program «i11 
type out the benk and pattern numbers as each pattern is run. 


2.4.4.8.19 Field Service Command 18 (Resume Testing All Banks) 
Disable “Trace”. (undo Command 16). 


to A Ct 
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2.5 Execution Times 
2.5.1 Typicel (System) - 


Execution time depends on many veri ables; however hnere 
measured times on an 11/44 with cache: 


128K words of MS11-L Memor 
Normal Pass 0 Min 50 Sec 
Quick Verify 0 Min 30 Sec 
Kamikaze Mode 10 Min 5 Sec 
Kamikaze QV 10 Min 5 Sec 


128K words of S11-M Memory (Non-Interleaved) 
Normal Pass 2 Min 25 Lec 
Quick Verify 1 Min O Sec 
Kemikaze Mode 11 Min O Sec 
Kamikaze QV 10 Min 30 Sec 


126K oo of MS11-M ener (Interleaved) 
Normel Pass Min S tec 
Quick Verify 1 Hin 30 Sec 
Kemikaze Mode 22 Min 0O Sec 
Kamikaze QV 20 Min 5 Sec 


2.5.2 Calculetions (System) 


Normel Pass 


Add 18 Sec per BANK of Non-Intereaved MS11-M 
Add 15 Sec per BANK of Interleaved MS11-m 
Add 6 Sec per BANK of MS11-L 

Quick Verify Pass 
Add 6 Sec per BANK of Non-Interleaved MS11-M 
Add 7 Sec per BANK of Interleaved MS11-M 
Add 6 Sec per BANK of MSLI-L 


Kamikaze Mode 


sre some 


Add 10 min. per 128K words for approximate pass times. 


NS 
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1527 w 35 
15286 _ 
1529 
rth 2.5.3 Typical (Patterns) 

1 

1532 Pattern Time Description 

2 a ee | en Ty 

1534 

1535 MTOOOO ;<1 SEC DATA PATTERN TEST 

15346 MTOOO1 ;<1 SEC ADDRESS TEST 

1537 MTOOO2 ;<1 SEC COMPLEMENT ADDRESS TEST 

1538 MTOOOS ; 1 SEC 3 XOR 9 WORST CASE NOISE TEST 
1539 MTOOO4 ; 1 SEC ROTATING ZEROS TEST 

1540 MTOOOS ; 1 SEC ROTATING ONES TEST 

1541 MTOOO6 ;<1 SEC INITIAL DATA TEST 

1542 MTOOO7 ;<1i SEC ADDRESS BIT TEST 

1543 MTOO1O ;<1 SEC BYTE ADDRESSING TEST 

1544 MTOOL1 ;<2 SEC CREATE SINGLE BIT ERROR TEST 
1545 MTOO12 ;<1 SEC WRITE BYTE CLEARS SBE TEST 

1546 MTOO13 ; 1 SEC CREATE DOUBLE BIT ERROR TEST 
1547 MTOO14 ; 1 SEC WRITE INHIBIT DURING DATIP WITH DBE 
1548 MTOO15 ; 1 SEC WRITE INHIBIT OF BYTE WITH DBE 
1549 MTOO16 ;<1 SEC WRITE INHIBIT OF WORD WITH OBE 
1550 MTOO17 ;<1 SEC HOLDING 1’ ° — 0’S TEST 

1551 MTOO2O0 ;<1 SEC MARCHING 1'S € 0’S IN -_—— BITS 
1552 MTOO21 ; 1 SEC MARCHING oe € 1’S TEST 

1553 MTOO22 ;10 SEC REFRESH TEST 

1554 MTOO23S ;10 SEC SHIFTING DI 

1555 MTOO24 ;20 SEC FAST GALLOPING PATTERN TEST 
1556 MTOO25 ;<1 SEC INTERRUPT ENABLE 

1557 MTOO26 ;<1 SEC RANDOM DATA TEST 

1558 MTO0027 =; SEC UNIQUE BANK TEST 

1559 MTOOSO ; 1 SEC FLUSH OUT DBE‘S TEST 

1560 MTOO3S1 ; 3 SEC SOB-A-LONG TEST 

1561 MTOOS2 = ;<1 SEC WRITE RECOVERY oe" 

1562 MTOOSS ;35 SEC BRANCH GOBBLE TES 

1563 MTOOS4 ;<1 SEC SOFT ERROR TEST 

1564 MTOO3SS ;<1 SEC WORST CASE PARITY TEST 
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3.0 ERROR INFORMATION 

3.1 Error Report ing 

Most errors ere reported using the EMT trap ard nendlier prov ded by 
SYSMAC.S*iL. Most errors will be of the “MEMORY DATA ERROR” type whicr 
will be described here. MEMORY DATA ERRORS will eleo cause the bar. 
to be marked es Bad in the configuretion table. 


Otner errors ere best explained by referencing the specific typeout 
and f necessary the program |isting. 


Example i: 


MEMORY DATA ERROR 
PC BANK VADO PADD GOOD BAD XOR MTYe IN’ Pat 
000 vy 


022132 37 060006 05700006 000000 000100 100 06 
022132 37 060006 03700006 900000 000100 9000100 oOo ™ 06 
022132 37 060006 03700006 9000000 000100 000100 oO ™ - 06 
022132 37 060006 03700006 900000 000100 000100 0 %* - @ 


While testing Berk 37 et virtual eddress 60006 (virtuel eddresses are 
Gleweys between 60000 enc 157776 for mappi purposes), phrysicel 
eddress 5700006 (thet’'s Bank 37 physical 6 within the Berk) with 
Pattern 6 (Initial Dete Test), the good date expected was 0 but the 
date ectuelly reed (BAD) wes 100, the exclusive OR ast Good E Bad 
yields 100 which indicates only failing Dit(s) (Bit 6). It is an 
pS (ECC) Memory and it's not interleaved. The CSR is located ast 
172000. 


a ANCE 
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Example 2 
MEMORY DATA ERROR 
PC BANK VADD PADD GOOD BAD x¥OR CSR MTP IN’ Pat 
022132 35 060000 03500000 000000 000001 000001 Oo M 1 Or 
022132 35 060002 03500002 000000 000100 000100 0 -M 1 Or, 
022132 35 060006 03500006 000000 000100 000100 0O -™ 1 04 


Wnile testing — 35. virtual eddress 60000, physicel address 3700000 
with Pattern 6 (Initial Dete Test), the good dete expected was 0 but 
the date actually reed (BAD) wes 1, the exclusive OR et Good E Bad 
oo 1 which indicates only failing bit(s) (Bit 0). It is an MS11-m 
ECC) Memory and it’s interleaved; so since Address Bit i was not 
esserted, the CSR is located et 172000. 


While also in Bank 35, virtual eddresses 60002 and 60006 were expected 
to have O, but the date read was 100, the exclusive OR of Good — Sad 
yields 100 which indicates one failing bit (Bit 6). Since it is 
interleaved MS11-M memory, and Addrees Bit 1 is esserted, the CSR ‘s 
loceted sat 172102 (CSR number 1 under the INT colum) 


NOTE 


Subsequent errors of the seme test do 
not type @ new heading. 
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53.2 Error Abbreviations 


Tne following is @ list of all sbbreviations usec in error reports. 


i 


® OF ERRORS 
ST ADD 


Number of Errors thet were detected. 

First Address thet fei led. 

The errey number thet was locked up in the MSIL ™ CSR. 
Tre @ of CPU's APT expects on the system. 

APT Core size. 

APT MOS size. 

Bed dats. 

Bed Word @1 of ea doable word date value. 

Bed Word @2 of ea double word date value. 


Bed Check Code Bits. 

Tre Bank number. Benks ere 16K words long. 
Bad Check Code Bits. 

Tre 7 bit velue of the Creck Code Sits. 
Tre CACHE Control register. 

CPU Error ister. 

Control and Stetus Register. 

CSR NUMBER (0-F Hexidecimal ). 


The CACHE Dete ister. 
Double Bit Error (uncorrectable error). 
Device 


Address. 

Error Correctable Code. 
Geod Check Code Bits. 
Good Check Code Bits. 
Good Word @1 of ea double word date value. 
Good Word @2 of a double word data value. 
Geod dete. 
Interleaved (Address 8it 1 esserted) CSR number. 
any Mi ttn ag wa ter 00 

ry ister . 
Memory Management Register ¢1. 
Memory Menagement Register @2. 
sp gt A Management Register ¢@3. 
MS11-M Size. 


UE Ge NCt 


Memory Type (MS11-..MS11-M,MF11S-K, BIPOLAR or UNIBUS Parity). 


Physicel Address (esserted by the program after mapping). 


Pettern number. 

Program Counter et the time the error occurred. 
Psy Bit Error (correctable error). 

ire tue 


1 Address (eeserted by the progrem before snapping). 


Tre dete thet wes written into the ist half of ea double «ord. 
Tre date thet was written into the 2nd helf of a double «ora. 
Exclusive OR of the good end bed data. Shows the bad bits. 


CZMSDDO MS1: 


E 4 


M1i1% 14 JAN-82 i6:15 PAGE 60 


Page *% 


5.5 Error Halts 

Trere are severe] Halts in the program. 

All unused trap vectors contain a trap catcher (.WORD .+2,HALT). 

An undefined TRAP instruction halts et symbolic location “SHALT?:. 
Tre APT down load sequence will halt et symbolic location “APTHLT”. 
Halt om Error option (SW15 Set) sat symbolic location “SHALT”. 

Healt progrem (SWS Set) at symbolic location “SEXHALT”. 


Power -e@il will normally melt et the end of the shut down sequence 
(symbolic locetion “$ at P 


Power Feil hes e fetel Halt at symbolic location “SILLUP” wrnich can be 


cevsed by power up occurring before power down sequence completed or 
by power down before @ power up sequence is completed. 


4.0 PROGRESS REPORTS 
Pess complete typeouts as fol lows: 


END PASS o 0 
END PASS @ i 
END PASS eQv 2 


NOTE 


Pees 2 wes flegged es @ Quick Verify 
Pess. (Because of a change in SWS) 


To obtein progress reports while executing. typing a Control "TT" will 
print out the information encoded in the display register. 

Example: 

BANK: 2 PAT= 34 


Reference Section 2.4.4.8.18 for more information on Tracing. 


ence 
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5.0 CSR INFORMATION TABLES 


Page 40 


The following is @e picture view of the current control status 
registers «hich can be tested by this program. It shows bit 
assignments ard definitions to provide @ nandy reference, snd 
shows the similarities and differences between each one: 


NOTE 


All unused bits in each CSR ere equal to sero. 


S.1 CORE/MOS PARITY REGISTER 


-nrqeeP*e@eeeese#eeeeeweFe#stse*e@e#ereeestseteeteaeeseseFt ewe nseeiste f+ *- + 


Ee ee 


7-7 ee *e- + « 


ok a ee 
ct =f RES 
i oe Se 


s* ere ee - *- - *- 


15 14 13 12 11 10 09 06 07 06 OS 04 03 O2 C1 OO 


Bit assignments ere defined es follows: 


BITiS PARITY ERROR 


BITS 11-5 ERROR ADD- 
RESS High order add- 


rees bits of saddress | 


of perity error _ 
17-11 of aeddress) 


BITO2 WRITE WRONG 
PARITY WNormel per ity 
(odd) 8 86when clear; 
other perity Ceven) 
when set. 


BITOO ACTION ENABLE No 
ection when cleer trap 
to vector i114 when 
set. 


to A Me 
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5.2 MOS BIPOLAR PARITY REGISTER (USED IN THE 11745 -55) 


. £22 oe eee fe ‘ese ee 
oT oe oe ee ee ee ee ee ee ee 
es a eee ee t F 2 ee Se 


i ee _ sft es ff * re ff © ww @eeeese@eee#e#eq@ec@seeeq#eqex#seieseq@®e#shere#t#t#*s*s* « 


15 14 13 12 11 10 09 08 07 06 O05 04 03 O2 O1 00 
Bit assignments ere defined as follows: 
BIT1S PARITY ERROR 
BITO2 


when cleer; other 
perity (even) when set 


BITOO ACTION ENABLE No 
action when clear trap 
to vector 114 when 
set. 


aa a 4 NCE 
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5.5 MF11S-«K CSR 


_-- e+e + * 


Terra see eS . s 
‘DME! Istt ADORE SS (SEHIPIDCIEC IEE! 
ge 2 ac Ee me oe = 


BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS: 


BITIS OOUBLE ERROR Set 


whenever O86 occurs. 


If BIT2*0, the error 
eddress will be stored 
in Bite 11-5. If BIT2 
oi. tne check bits 
read will be stored in 


BITS 11-5. 


BIT 13 SET INHIBIT 
MODE When this bit is 
set toe ll, it enables 
the Inh Mode Pointer 
to inhibit either the 
——— or second 16K 

rom ever going into 
the Diag. Check or 


ECC Disable mode 


When this bit is set 
to zero, the entire 
memory operates in in 
Diagnostic Check or 


ECC Disable Mode. 


BITS 11-5 ERROR 
ADDRESS With BITo2 
cleared they contain 
the high order error 
address (Bite 17-11); 
with BITO2 set they 
contain the check bits 


for ECC. 


BITO4 SINGLE ERROR Set 
whenever single error 


occurs 


SE GUENCE 


Ge 
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BITOS INHIBIT MODE 
POINTER Tre Inhibit 
Mode Pointer works in 
conjunction with the 
Set Inhibit Mode bit. 
When BITI3S is set to s 
1, @ 16K portion of 
memory SG innhibitted 
from operating in tne 
ECC Disable mode or 
Diegnrostic Check mode. 
tne Innibit Mode 


Pointer indicates 
which 16" is being in 
hib: ted; e.g. -wnen 


16K of memory is in- 
hibitted. When BIT 13 
is set toed, BIT 3 
becomes ‘nopersat ive. 


BITO2 DIAGNOSTIC CHECK 
MODE When set enables 
reed-write of check 
bite(eee Bits 11-5). 
If e OBE occurs in 
this mode (with BIT 
0), BITIS in the CSR 
‘S@ set but the check 
bits from memory ere 
stored in CSR Bits 
11-5 and not the OBE 
address bits. 


BITOL OISABLE ERROR 
CORRECTION When set no 
single error correc- 
tion tekes plece and 
the error is not log- 
ged in the cer; cor- 
rect check bits ere 
etill written to the 
memory however. 


6SITOO OOUBLE ERROR 
ENABLE Wren set 
enables trap to vector 
114 on double error. 


J s s NCS 
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5.4 MSii-t CSR 
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ee 
1WwP! ft AES 
2 oe ge 


15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 


Bit assignments are defined as follows: 


BIT1S PARITY ERROR 


BIT1i4 EUB ERROR 
RETRIEVAL —. — 
memory is 


Extended UNIBUS, staan 
BIT14 is zero, the low 


order failing 
eddresses ere 
evei lebie (Bits 


11-17); when BITI4 is 
one, the high ae 
failing eddresses 
euathenis (Bits 18- *D i 
of address). If the 
memory is on ae UN 

@ jumper disables this 
bit so thet it is read 
bake. end equal to ze- 
ro. 


BITS 11-5 ERROR 
ADDRESS With BIT1i4 
set, they contain the 
high order perit . 
ror address Bits 
21-18 of eddress >); 
with BIT14 cleared, 
they contain the low 
order parity error ad- 
dress (Bits 17-11 of 
address). 


BITO2 WRITE WRONG 
PARITY Normel parity 
Codd) when clear; 
other perity (even) 
when set. 


BITOO ACTION ENABLE No 
action when cleer; 
trep to vector 114 


to ANCE 


i. 
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1979 when set. 
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1981 

1982 a 

198% 

tes 5.5 ™Si1-™ CSR 

1986 

en we ee eee ee eee 

1 th ie a ee Se ie Se ee Se ae ee Ge Fe 

po we ee $ ADDRESS SE ITPYOC HEC EE 

pe aw 2 an ek |e I I 

pan. 15 14 13 12 11 10 09 08 O7 O06 O05 O04 O53 O2 Ol “00 

a8 Bit assignments are defined as follows: 

996 ORRE 

poe BITiS UNC CTABLE 

soe" ERROR This bit is set 

on ‘f @ OBE occurs, and 
the error saddress is 

oes stored in the CSR. 

pene: This bit is elso set 

— in the EcC Disable 
mode if an SBE or DBE 

oo occurs. 

5007 BIT14 EUS £ ph se 

pad RETRIEVAL If the mem - 
ory is on an Extended 

og UNIbus, when BIT14 is 

cats zero end either BIT4 

os or BIT iS is @ one, 

cone tre low order failing 

sols addresses ere ave lab- 

ooes le (Bits 11-17); when 

+4 BITi4 is one, the high 

5017 order failing eddress- 

444 es ere available (Bits 

<o19 18-21 of eddress). If 
the memory is on ~o4 

pony UNIBUS, @ jumper dis- 

5022 ables thie bit so that 

pas it is read only. and 

aos equel to zero. 

2025 

ss BIT13 SET INHIBIT MODE 

5007 When this bit is set 

po to el. it enables the 
Inn Mode Pointer to 

on inhibit either the 

poe first or second 16K 

peed from ever going into 

ose the Diag. Creck or 

ooae ECC Disable mode . 

O35 When this bit is set 

poo to a 0, it allows the 
Diag. Cneck mode 


7 
203 and/or ECC Disable 
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BITS 11-5 ERROR 
ADDRESS With BITO2 
cleared and BIT14 set, 
they contain the high 
order error eddress 
(Bits 21-18); when 


BITO2 and BITI4 sre 


cleared, they contain 
the low order error 
address (Bits 17-11); 
when BITO2 is set they 
contains check obits 
for ECC 


BITO4 SINGLE ERROR Set 
whenever single error 
occurs. 


BITOS INHIBIT MODE 
POINTER The Inhibit 
Mode Pointer works in 
conjunction with the 
Set Inhibit Mode bit. 
when BIT13 is set to a 
1. a 16K portion of 
jaan s is inhibitted 
rom operating in the 
ece Disable mode or 
Diagnostic check mode. 
the Inhibit Mode 
Pointer indicates 
which 16K is being in- 
hibited; e.g.-if BITS 
=i, the second 16K of 
memory is inhibitted. 
when BIT13 is set to ea 
0, BITS becomes 
inoperetive. 


BITO2 DIAGNOSTIC CHECK 
MODE When set enables 
reed-write of check 
bits(see Bits 11-5). 
If e OBE occurs in 
this mode (with BIT1L=«0 
the check bits read 
ere stored in Bits 
address bits. 


SEQUENCE 
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BITOlL OILSABLE ERROe 
CORRECTION Wren set nro 
single error correct: 
on tekes plece. ~ 
single bit error will 
set BITO4 endo BITIS 
and eesert BUS PRL 
if BITOO ‘6s esserted; 
e@ double error «11 
set set BIT15S end as. 
sert BUS PR Lt if 
BITOO is asserted. 
Tre error eddress is 
stored in the CSR, and 
correct check Bits are 
gerereted ard stored 
on e write. 


BITOO UNCORRE CT ABLE 
ERROR ENABLE When set 
enables trap to vector 
114 on wuncorrectable 
error. 


SEG ENCE 


° ‘ 7 
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6.0 SUB-TES'T SUMMARIES 


6.1 


TEST 


TEST 


TEST 


TEST 


TEST 


TEST 


Tests 


i 


BIT TEST OF ALL CSR’S/MATCH ALL CSR’'S WITH MEMORY 
(CSR Access may cause wrong Type of Traps) 


2 


TEST BANK O ACCESSES 
Feilures are fetel. 


3 

TEST BANKS 1-200 (OCTAL) FOR ZEROS AND ONES 
Errors ere not typed here - only logged in 
the configuration table 

4 

ECC INHIBIT MODE POINTER TEST 

5 

DIAGNOSTIC MODE DISPATCH ROUTINE 

Tris test runs ell the petterns in the 
mode selected. 

6 


UNIGUE BANK TEST 
Pettern 27 ‘¢ rum 


£ DENCE 


ta 
ed 
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< 166 Page 4% 

2167 

2168 
2169 ‘ 6.2 Patterns 

2170 

tg: 6.2.1 Generel Pattern Information 

2172 

2173 Actuel petterns ere identified by symbolic locations “MIPxYY” where * 
2174 may be any sb progres indicetor (A,8,.C.etc) or 0 and rr will be the 
2c5° number of the pettern. 

176 
2177 Setup procedures for each pattern ere identified by symbol'c locations 
238 “MTOOYY” where YY will be the number of the pattern. 
2179 
2180 Petterns reside in 4 scripts thet ere scanned for execution. Symbolic 
2181 lecetion “MKCSRT” is oe teble of patterns that can run once for each 
2182 ECC bank (twice for interleaved MS11-M's). Symbolic location “MKPAT” 
21863 ‘Ss @ teble cf petterns thet can run on each Bank of ECC memory. 
2184 Symbolic locetion “MUPAT”“ is e table of petterns thet cen run on each 
2185 Berk of Perity memory. Symbolic location “FSPAT” is @ table of 
pies patterns thet cen be rum in Field Service Mode ‘command 5). 
2185 The ist 3 ecripts sre er controlled by the APT E-table (even 
2189 if net running under APT). ifications to this table can be made 
ty (1) with APT, or (2) manuelly. 
poke Example E-teble Segment: 
2194 ; THE FOLLOWING LOCATIONS SPECIFY WHICH PATTERNS 
pte ;ARE TO BE RUN FOR PARTICULAR MEMORIES 
2197 sREFERENCE THE TABLE LISTED BELOW TO RELATE BITS TO PATTERNS. 
2196 sBITO SET WILL RUN THE FIRST ENTRY IN THE TABLE. BITO SET 
po 3 IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE... 

3 

2201 sNOTEeeMAL TESTS DO NOT TAKE ANY TIME 
2202 5 RECOMMENDED VALUE 
2203 s00W0 : . WORD 177777 sECC CSR TESTS 177777 TABLE _= MKCSRT: 
2204 t00w1 : . WORD 177777 sECC CSR TESTS 177777 TABLE _= MKCSRT: 
2205 s00We2 : . BORD 177777 ;ECC PATTERNS 103777 TABLE _= MKPAT: 
2206 sD0wSs: . WORD 177777 ;ECC PATTERNS 177777 TABLE _= MKPAT: 
2207 $00W4:  $.WORD 177777 sPARITY PATTERNS 003777 TABLE _> MuPAT: 
2208 t00ws : . ¥ORD 177777 ;PARITY PATTERNS 177774 TABLE _= MUPAT: 
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6.2.2 “Specific Patterns 


6.2.2.1 Pattern 0 Besic Data Test 
Writes & Reads R2 into eae 16" Bari. 


Tris is veed for Zeros end Ones testing and in Fielo Service Mode ‘for 
any console selected pattern. 


It can execute out of the VSER Instruction PAR's. 


NOTE 
It is frequently modified dynamicaily 
euch thet (1) it returns after writing 
ya aL ay ist NOP is repleced with oa 
RET ) or (2) it only counts Errors 


(the code PERRO2 and NOP sre repleced 
with INC @OPATERR). 


6.2.2.2 Pattern 1 Address ‘est 


Writes € Reads ean incrementing pattern equivalent to physical 
eddressed into a i6K Genk. 


It can execute out of the USER Instruction PAR's. 


6.2.2.3 Pattern 2 Complement Address Test 


Writes the complement of the physical eddress from high addresses to 
low (write down) and reade from low eddresses to high (read up). 


This provides the complement of the coverage of Pattern 1 in both date 
pattern and eddressing sequence. 


It can execute out of the USER Inetruction PAR's. 


“% 


‘ 
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2265 P > 
2264 a 
2265 
oss 6.2.2.4 Pattern 5 53 xOR 9 
= ii tee E Reeds @ pattern thet compiements ss address bits % and 9% 
2270 wi es 

This pattern is run 4 times (1) with Zeros & Ones, (2) ith é 
= Zeros. (5) with 401 & Ones, and (4) with Ones & 401. The pettern of 
4 the 401 is to force a tre perity bits to become involved. 
2275 It can execute out of the USER Date POR's, the User Instruction PAR: 
p> ba tne Kernel Date PAR's and the Supervisor Jaetea PAR's. — ™ 
2278 
2279 
2260 
oo. 6.2.2.5 Pattern 4 Rotating Zeros Test 
2265 Writes @ background pettern of Ones. Rotetes oe Zero Carry Bit 1 

: ' eft 

prod thru each per of bytes (18 times) and then checks that the carry is 
— Zero and the word (2 bytes) is still ell Ones. 
poo It can execute out of the User Date PAR's and the “Kernel Dete PAR's. 
2269 
a - 
— It is not uncommon to observe the 
2294 dete equal to the bad date. his 
soe indicates thet the corry wes not clear 
pote after 18 ROLB’s. 
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6.2.2.6 Pattern 5 Rotating Ones Test 


Weites e beckground pettern of Zeros. Rotates s One carry bit left 


thru eech pair of bytes (16 times) and then checks that the Carry ‘s s 


One and the Word (2 Bytes) is still ail Zeros. 
Tris provides the complement of the coverage of Pattern 4 in data. 
It can execute out of the User Daets PAR’s and the Kernel Data PAR’s. 


NOTE 


It is not uncommon to observe the 

Gete equal the bed dats. This indicates 

La the Carry was not set after 14 
4 > 
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6.2.2.7 Pattern 6 Initial Date lest 


Writes —€ Reads = double word first with all o'ts O except 1 ‘for every 
bit , Neate Second with all bits 1 except 1 (for every bit 
position 


This is @ very quick check of the date peths. 


6.2.2.8 Pettern 7 Address Bit Test 


Writes e beck of ell Zeros. 
Read Address for ea O Byte. 
amen ene Address 1. 


For each Address Bit position from Bit i: 
Virtual (2, 4, 10, 20, 40, 100, 200, 400° 1000, 2000, 4000, 10000, 
60000, 20000) 


Physical (60002, 60004, 60010, 60020, 60040, 60100, 60200, 60400, 
61 - 62000, 64000, 70000, 140000, 100000) 

Reed Address for ea 0 word. 

Complement Address contents. 

Read Address for ea non-zero “word. 


This is @ very quick check of the sddress bit uniqueness. 


6.2.2.9 Pattern 10 Byte Addressing lest 


With ECC Disabled. 

Writes all ones to a double wo 

For each of the 4 Bytes in the ; an Word. 
Clears one byte 
Reads ell 4 bytes from douwle word. 
Crecks for only proper byte ae 
All other bytes set to all ence 


This is only done on one double word address. 


NOTE 


Tris ie rum for ECC memory only 


{tf ? a Noe 
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13. 


Patternr ii Single Bit Error Test 


Create a Single Bit Error. 
Read date Uncorrected ‘with ECC Disable). 


Creck thet SBE and OBE flags are set, and the error asddress 
's latched. 


Reed First Word of date corrected (#itm ECC Enabled) 


Check that the CSR Single Bit Error Flag was set, and the 
error eddress wes latched. 


Clear SBE Flag. 
Read Second word of date corrected (with ECC Enabled). 
Creck thet the CSR Single Bit Error Flag was set. 


Do (1-7) for @ Single Bit Error in each of 32 positions of a 
double word. 
i.@. (32 TIMES) 


If not in Quick Verify Mode then Do (1-8) for date consisting 
of 1 bit set in each of 32 positions of a double word. 
i.@. (32 K 32 = 1024 Times) 


Do (1-9) for complemented dete (1 Bit clear in each of 32 
positions of e double word). 

i.@. (€1024 XK 2 = 2046 Times) 

or (32 X 2 = 64 Times (Quick Verify)) 


Do (1-7) for @e double word equel to (000000,000000), and all 
possible Single Bit Error combinations forced into the Check 
Bite (CSR bite 5-11). 


Clear any errore out of test locet ions. 


This ineures that all Single Bit Errors can be corrected and detected. 


NOTE 


Tries test is run for ECC memory only 


ya 
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6.2.2.1] 
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Pattern 12 Write Byte Clears SBE Test 


Create oe Single Bit Error. 

Write a Syte of Double Word to Ones. 

Reed a Byte of Double word. 

If this is MS11-M, the SBE flag should be SET. 

If this is MF11IS-K the SBE flag should be SET if this is tne 
byte with the error. 

Tre Byte should have been equsel to Ones. 

Do (1-5) for each of the 4 Bytes of the Double word 

Do (1-6) for a Single Bit Error in each of 32 positions of s 
Double Word 


If not in Quick Verify Mode then do (1-7) for date consisting 
of 1 Bit set in esch of 32 positions of a double word. 
1.@. (€32 KX 32 = 1024 Times) 


Cleer any errors out of test locations. 


This insures that single bit errors in the date portion (not in 
checkbite) can be cleared by writing the corresponding byte and that 
writing any other byte does mot change the existing single bit error. 


NOTE 


Tris test is run for ECC memory only. 


aa iF 4 NC f 


é ‘ 
. 


CZMSDDO S11 .“M DIAGNOSTIC 


2468 
2469 
2470 
2471 
2472 
2473 
2474 
2475 


MACRO M1115 i4 


KD 


JAN-82 16:15 PAGE 77 


Page 5Sé 


6.2.2.12 Pattern 13 Create Double Bit Error lest 


a 


4u Oo YW ®& 


10. 


il. 


Create ea Double Bit Error. 
Access the Dats (TST instruction). 


Cneck that the CSR DBE Flag is set, and the error saddress is 
latched. 


Initialize CSR to sllow parity traps on DBE's. 

Access the Data (TST Instruction). 

Check that e parity trap occurred. 

Do (1-6) for the 2nd Bit of each Double Bit Error in each of 
32 positions of ea double word less the one position of the 
lst Bao Bit. 

i.@. C31L Times) 


If not in Quick Verify Mode then Do (1-7) for the lst Bit of 
each of Double Bit Error in each of 32 positions of a double 


word. 
i.e. (31 X 32 * 992 Times) 


- ine for complemented dete (Ones versus Zeros in Double 
| al 

i.e. (€992 X 2 = 1964 Times) 

or (31 X 2 = 62 Times (Quick Verify)) 


Do (1-6) for a double word equel to (000000,000000). and ail 
possible Dowble Bit Error combinations forced into each of 
the check bits (CSR bits S-i1). 


Cleer any errors out of test locations. 


This ineyvres thet all Double Bit Errors can be created and detected 
and cevse traps. 


NOTE 


This test is only run during the first 
(QV) PASS when under ACT or APT, and is 
run for ECC memory only. 


SEQUENCE 


er 
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Pattern 14 Write Inhibit During DATIP wWitmh DBE Test 


Create a Double Bit Error. 

Do ASRB on Test Location. 

Creck that Double Word is STILL Bad (Unchanged with OBE). 

Do (2-3) on all 4 Bytes of Double word. 

Do (1-4) for the 2nd bit of each Double Bit Error in each of 
il thy of a Double Word less the one position of the 
i.@. (31 Times) 

If not in Quick Verify Mode then Do (1-5) for tne lst dit of 
each Double Bit Error in each of 32 positions of eo double 
Tee (32K 32 © 922 Times) 

- * a for complemented date (Ones versus Zeros in Double 


rd). 
i.e. €922 ¥ 2 = 1984 Times) 
or (31 X 2 = 62 Times (Quick Verify)) 
Do (1-4) for ea double word equal to (000000.000000), and all 
ible Double Bit Error combinations forced into the Check 
ite(CSR bite 5-11). 


Cleer any errors out of test locations. 


This insures thet the Double Bit Error can be cleared by a DATIP to 
any affected Byte. 


NOTE 


Tris test ie only run during the first 
(QV) pesse when under ACT or APT, and is 
run for MFLIS-K only. 


ANCE 
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Pattern 15 Write Inhibit Of Byte With DBE 


Create a Dowwle Bit Error. 

Do a MOVE immediate to test byte. 

Check that Double Word is still Bad (unchanged with OBE). 

Do (2-3) on ell 4 Bytes of Double Word. 

Do (1-4) for the 2nd Bit of each Double Bit Error in each of 
oa. (oy of a double word less the one position of the 
'.@. (C31 Times) 


If not in Quick Verify Mode then Do (1-5) for the ist Bit of 
eech Double Bit Error in each of 32 positions of sa Double 


Word. 
i.@. (31 X 32 = 922 Times) 
~ Pe : -6) for Complemented Dete (Ones versus Zeros in Double 


i.e. (992 X 2 = 1984 Times) 
or (31 X 2 © 62 Times (Quick Verify)) 


Do (1-4) for e double word equel to (000000,000000). and all 
ible Double Sit Error combinations forced into the Check 
ite (CSR bite 5-11). 


Cleer any errors out of test locations. 


This insures thet no Double Bit Error can be cleared by a MOVB to any 
affected Byte. 


NOTE 


This test is only run during the first 
(QV) pees when under ACT or APT, and is 
run for ECC memry only. 
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6.2.2.15 Pattern 16 Write Inhibit Of Word With DBE Test 


vi ff Ww NH 


9. 


Create a Double Bit Error. 

Do MOV IMMEDIATE on test location. 

Check that Double Word is STILL Bad (Cunchanged-with OBE). 

Do (2-3) on both Double Words. 

Do (1-4) for the 2nd Bit of each Double Bit Error in each of 
32 PS of a baate Word less the one position of the 
va “tsi t Times) 

If not in Quick Verify Mode then Do (1-5) for the lst Bit of 
each Double Bit Error in each of 32 positions of ea Double 
fee, (32 X 32 © 992 Times) 

Do More). for Complemented Date (Ones versus Zeros in Double 


(992 KX 2 = 1984 Times) 
on *¢31 X 2 = 62 Times (Quick Verify)) 


Do (1-4) for ae double word equal to (000000,000000), and all 
possible Double Git Error combinations forced into the Check 
Bits (CSR bits 5-11). 


Clear any errors out of test locations. 


This insures thet no Double Bit Error can be cleared by a MOV to any 
affected word. 


NOTE 


This test is only run during the first 
(QV) pase when under ACT or APT, and is 
run for ECC memory only. 


6.2.2.16 Pattern 17 Holding l‘s € 0's Test 


1. 


2. 


Write ea 16K Bank with elternating Bytes of Zeros E Ones 
writing a Byte at eo time. 


Read each Word for correct pattern. 
Do (1-2) again for a complement pattern. 


SEQUENCE 


) 
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Pattern 20 Marching O's € 1's In Cneck Bits Test 


Write Double Words of 000000, ,000000 which causes check b' ts 
to equal 077 while address: increments. 
(Write Up/077 --> check bits 


If im Quick Verify Mode then Go to Step (5). 


Read Double Words € check while writing ©000000,,100000 ana 
addressing decrements. 

(Down/077 --> 100) 

This flips ell the checkbits. 


Read Double Words E check while writing Zeros while 
addressing increments. 
(Up/100 -->» 077) 


Reed Double Words —€ check while writing O000000,,100000 €é 
addressing increments. 
(Up/077 -->» 100) 


Read Double Words E cneck while writing Zeros while 
eddressing decrements. 
(Down/100 --> 077) 


Read Double Words € check while Addressing increments. 
(Up/077) 


This checks the integrity of the MOS chips thet store the checkbits. 


EG ANCE 
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Pattern 21 Marching O's € i's Test 


Write e Background of alternating Bytes of Zeros & Ones 


For 
(a) 


the 16K Bank sddressing Down 
Reed check ea word 

Byte Swap e word 

Read check e word 


the 16K Bank addressing Up 
Reed check es word 
Byte Swap e word 
Read check a word 


the 16K Bank eddressing Up 
Read check a word 
Byte Swap e word 
Reed check ea word 


the 16K Bark eddress:ng Down 
Read cneck a word 

Byte Swap ea word 

Read check a word 


This checks the integrity of the 32 Bit Double Words. 
It can execute out of the User Data PAR's. 


NOTE 


It is not uncommon to see a misleading 

error typeout because the second test in 

eech cease is besed upon es byteswap of 

the firet test which may or may not have 
feiled. If the error report indicates 
errors in peire with the bad bit in the 
second report being the same bit 
position reletive to e byte then you - 
should ignore the second error report. 


, ” 
SANE 
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6.2.2.19 Pattern 22 Refresh ‘test 


Write @ di: agonel pattern of ones on every KDIAG( TH) strice £ 
write zeros elsewnere. 


Tris pattern is on addresses not bit positions 


Example: 
Address MSB's 
LSB’s '009010001 
'00 10001090 
'01000100 
£1 0001000 
*'§oo0o01i o0ddi 
'£o00100010 
'co1i1i00g00100 
‘10001000 


NOTE 
Example uses KDIAG of value 4 more typicel is a velue 


of 8. Consult the symbolic definition of “KDIAG” in 
the program listing to be sure. 


Disturb each row for > 3.2ms 
Read check diagonel pattern 


Do (1-3) KDIAG times moving the placement of the diagonal 
stripe to cover ell eddress positions. 


De (1-4) for ea complement pattern 
(zeros in a beckground of ones) 


NOTE 


Tris test is not normally executed 
except under APT or ACT. It may be 
invoked VIA Field Service Command 13 
(Kemikeze Mode). 
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6.2.2.€0 Pattern 235 Shifting Diagonal Pattern Test 
Similer in overell operation to pattern 22 except it does not delay 
for refresh and disturb rows. 
NOTE 
Tris test is not normally executed 
except under APT or ACT. It may be 


invoked VIA Field Service Command 13 
(Kamikaze Mode). 


6.2.2.21 Pattern 24 Fast Gelloping Pattern Test 
This does s clessicel gelloping pattern except that eaddressing is 
incremented by 400 Octel (every 64th double word) 
NOTE 
Trie test is not normally executed 
except under APT or ACT. It may be 


invoked VIA Field Service Comnand i153 
(Kemikeze Mode). 


,t G x NCE 


»+ 
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2856 6.2.2.22 Pattern 25 Interrupt Enable ‘est 

Set CSR to Allow Uncorrectable Error ‘raps. 
Access Test Double Words. 

Creck nat no Uncorrectable Error Trap occurred. 
Enable CSR for SBE Traps. 

Access Test Double Words. 

Check that no SBE Trap occurred. 

Write e SBE in 1 Byte. 

Disable CSR Traps. 

Access Test Double Words. 

Cneck that no Traps occurred. 

Enable CSR for SBE Traps. 

Access Test Double Words. 


: 
© @nwmoeyesiwit ewe 


Mh ho fof 
S55 @ 
| 
@ 
—- = 
uy wf SO 


2882 13. Creck to Insure Trap Occurred. 

= 14. Do (7-13) for the 3 other Bytes in the Double Word. 
aoe 15. Create e OBE in 1 Byte. 

ae 16. Disable CSR Traps. 

ota 17. Access the Test Double Word. 

pote 16. Check that no Traps occurred. 

oo. 19. Enable CSR for OBE Traps. 

aaae 20. Access the Test Double Word. 

= 21. Check to Insure Trap Occurred. 

one 22. Enable CSR for SBE Traps. 

tee 23. Access the Test Double Word. 

coo 24. Cnreck to Insure Trap Occurred. 

pda 25. De (15-24) for tne 35 other Bytes in the Double Word. 


This insures that SBE’'s € DBE’s give the correct type of traps. 


i—|¢ 
1 ti 
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2911 NOTE 


2913 This test is run for ECC memory only. 


2920 6.2.2.25 Pattern 26 Random Deta Test 

2922 Write Random Date in ea 16K Bank while incrementing the Addresses. 

2924 Read check Random Data. 

23926 This routine regenerates the same random numbers by using the same 
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seed as the write sequence. After tne read check the seed is updseted 
so that the next use of this pattern will not invoke the same sequence 
of random numbers. 


If you wish to change the random sequence so that it is different than 
any other run in the same configuration then there sre 2 ways of doing 
so. 


1. omen ay symbolic locations “SEEDHI” and “SEEDLO” to any number 
you Like. 


2. Enter Field Service Mode and execute this pattern (command 5) 
on some (any good) bank for a short time (30 sec or so). 


Tris can execute out of the User Date PAR’s, the Kernel Data PAR’s, 
and tre Supervisor Dete PAR‘s. 


st SA WCE 


‘2 


CZMSDDO MS11 


L/™ DIAGNOSTIC 


Jo 


MACRO M1113 14 JAN-82 16:15 PAGE 87 


Page 66 


6.2.2.24 Pattern 27 Unique Bank Test 


This pattern uses Pattern 0 to write & read tne Bank number in each 
bank . 


It does not test Banks that require relocation to test. 


It does not run as part of any script but rether is always run after 
normel pattern tests sre comlete. 


6.2.2.25 Pattern 30 Flush Out DOBE'’s Teet 


Tris Reads each location then moves the old value back in. This is 
done ng ECC Disabled and therefore corrects any DBE’s or SBE's (if 
possible). 


It does not run as part of any script but rether is always run jus 
prior to the End of Pass Code, es part of a Control “C” (Beet) 
command, es part of End of Pass shutdown for ACT or XxXDP Crain Mode, 
es pert of hanging sequence after an error if under ACT or APT, and as 
pert of a shutdown sequence directed by Switch 8 (Halt Program). 


SEQUENCE 


74 
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6.2.2.26 Pattern 31 SOB-A-LONG Test 


Rat ionelization 


In order to concentrate the memory cycles of ea test into a particulier 
eddress, we must cut the overhead cycles to a minimum. Frequently. 
the instruction itself ma provide adequete date or set up +4 
background in which any comp loenanted bit may find it hard to survive. 


Tre SOB instruction is the only POP-11 instruction that is (1) aoa 
single operand, (2) can be repeatedly executed at the same PC and, (3) 
can escape this repetitious loop. 


Hence, it can be possible to SOB e MOS cell to death (or st least 
brain wash him), and to SOB a core into over-heating (or at least warm 
discomfort). 


Tre SOB Routine will be loaded and called with RO set equal to the SOB 
constent “SOBK”, Ri set equal to the complement of a "SOS RO,.” 
Instruction “100776”. 


Simplified SOB Exemple: 


1$: SoB RO.1$% :S08 till RO underf lows 
MOV R1,1$8 sWrite complement of SOB 
CMP Ri,1$% sRead € check not SOB 
BEG 23 :Skip if OK 
SOBF AIL :Trap € ‘ore error 
2s: SOBMOV 1 :Code to - o self moved 
SOBMOV2 :Forward 1 word and run again 
SOBMOVS 
SOBMOV4 
SOBMOV... 


The value of the SOB constent can be found at symbolic location “SOBK” 
(typical 25 decimal). 


This test is fer in the normel ecript of execution but mea 


, be addes 
vie the APT €E-TABLE, reference symbolic locations “MKPAT", “MJPAT”, 


“$00w2-5". Field Service Mode commend & is the normal ‘ieunne of 
running this pettern. 


NOTE 


Thie test is not normally executed 
except under APT or ACT. It may be 
invoked VIA Field Service Command 15 
(Kamikaze Mode). 
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6.2.2.27 Pattern 32 Write Recovery Test 


This test causes a WRITE, READ, WRITE, READ, ... to occur in memory 
and if the ist, 3rd, Sth, ...READ is bad the ~_—= may bomb or :# 
the 2nd, 4th, 6th, ... READ is bad the program wil gracefully type 
out the error. 


Write Recovery Test 

Tris test differs from other tests in that it consists 

of e smell test ,oreeres ectually running in the bank under test. 
The program is self modifying and may be difficult to 


To aid in the » remember that the bank and margin ere be: ing 
err...’ This will allow the user to at least see which memory 
e: 


The test ‘consists of 1/72 of the bank stored with “MOV R2,-(PC)” 
and the other 1/2 containing “177667". "177667" is the complement 
of "“JMP (RO)” instruction. R2 conteins "COM -(R1)” instruction 
on entry to the bank and R1 contains the highest test address in 
thet bank. 
If you understand this so fer the rest is easy. 
The test execution is es follows: 
1. The “MOV R2,-C(PC)” a executes storing 
the contents of R2 in the address it vacated (due to -(PC). 
2. Since R2 contains a "COM -(R1)” instruction it complements 
the hi t address under test. this eddress contained 
"177667" so after the COM -(R1) it equals 110 
cleverly this is the “JMP (RO)” instruction. 
5. This sequence continues until the “MOV R2, -(PC)” 
instructions reech the middle of the test bank. 
then the “JMP (RO)” instruction is met 
and executed. RO contained the return sddress back 
to test 15. 
4. These steps ere repeated for each bank under test. 


NOTE 


This test is not normelly executed 
except under APT or ACT. It may be 
invoked VIA Field Service Command 13 
(Kamikaze Mode). 
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6.2.2.28 Pattern 33 Branch Gobble Test 


Tris test loads a small routine into tne memory under test. Tre 
routine moves itself along in memory one word after each pass so that 
when it reaches the end every instruction has executed from every 
location with the exception of the beginning and end of each test 
area. 


Tne Branch Gobble's general format after you eliminate setup code and 
code to move the program slong is as follows. 


BGTEST: O s; TEST WORD 

BRGOBB: SEC 
ADCB BGTEST s INC LOW BYTE 
BMI 1$ sEND LOOP AFTER 128 TIMES 
INCB BGTEST+1 s INC HIGH BYTE 
BR BRGOBB ;LOOP 126 TIMES 

1$: BVS 2% ;BRANCH IF V-BIT SET (SHOULD BE) 
ERROR ; TRAP 

2s: CLV ;CLEAR v-BIT 
INCB BGTEST ; INC HIGH BYTE ONE LAST TIME 
Bcs 3% ;BRANCH IF C-BIT SET (SHOULD NOT BE) 
BvC 3$ ;BRANCH IF vV-BIT CLEAR (SHOULD NOT BE) 
BMI 4% ;BRANCH IF N-BIT SET (SHOULD BE) 

3%: ERROR sERROR TRAP 

4%: RE TURN 


Tris code ori eqnakiy ceme from the PDP-11 Fam: ly Instruction 
Exerciser OZQKA-A, he first MOS memorys fell succepteable to this 
section of that diagnostic and it nas been an important memory 
exerciser ever since. 


NOTE 


This test is not normally executed 
except under APT or ACT. It may be 
invoked VIA Field Service Command 13 
(Kemikaze Mode). 


CZMSDDO “S11 ./M DIAGNOSTIC 


N6é 


MACRO M1113 14-JAN-62 16:15 PAGE 91 


Page 70 


6.2.2.29 Pattern 34 Soft Error Test 


Rationalization 


MOS chips have a failure mode in which they can randomly pick cr drop 
bits. This is caused by Alpha particles bombarding the cell. If the 
cell is very small (and they are) then the electrons displaced by the 
Alpha perticle are sufficient to cause the cell to change from sa one 
to ea zero or from a zero to @ one. 


This test is controlled by the main program so that it is used to 
create a pattern of 125252 and 52525 on alternate passes of the 
program. The configuration table is used to flag banks that have the 
pettern invalidated because another pattern was written over this 
background. 


This pattern is nothing more than a clever use of pattern O. 


6.2.2.30 Pattern 35 Worst Case Parity Test 
1. Force Write Wrong Parity in each 1K word block of the Memory 
Under Test. 


2. Read with Parity Trapping enabled, making sure that a trap 
occurrs. 


3. Make sure error address bits are set correctly. 


4. Write good perity without trapping. and make sure no trap 
eccurrs when read. 


NOTE 


This test is run for parity memory which 
is not controlled by the same CSR as the 
program. 


SEQUENCE 


'a 


b 
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3179 6.2.2.31 Pattern 999 Null Test 
141 Tris (6 an instent return added to oreserve the software structure. 


sia" This pettern repleces any resi patterns wren the AP! E-Table goes not 
£144 spec fy s pattern to be run. 
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7.0 PROGRAM FEATURES 
7.1 Fest Dete Access Rates 


One of the main ereas of concern in testing memory in systems 

environments is speed. One of the prime ——— thet system programs 

like RSTS,IAS and MUMPS cen crash due to memory feilures not 

detectable by memory diagnostics (0-124K,0-2 MEG,etc.) is because of 

multiple NPR devices contending for the bus. After some delay «= NPR 

oe Rs aeceaie bus master and does seversal memory transfers at memory 
e rates. 


On the other hand most diagnostics when writing reading and/or 
checking patterns spend most of their time fetching ‘iad ti and 
operands out of their program space and proportionally itt: time 
eccessing the memory under test. 


This diagnostic’'s error detecting abilities nave been optimized around 
the primary design criteria of speed. To this end the following steps 
mheve been taken. 


7.1.1 Feet City 


Utilization of Memory Menegement Registers eas Non Memory Bus. Non 
UN ° Steeler Me Manery . Since User Mode is only used for relocetion 
and Dete Spece is never used, then subroutines can be executed from 
the UIPAR's, UDPAR's, KDPAR' s. SOPAR's and with some Bit Pettern 
restrictions the VIPDR’'s, UDPDR's, KDPDR’s. and SDPDR’s. 


The progres runs in Kernel mode and Patterns ere executed in 
Supervisor mode for mapping purposes. All core patterns anc some MOS 
Patterns ere subroutines thet ere moved to this Bipoler region 
referred to in the progres es Fest City. 


NOTE 


3s - Bi t PDP-11's cannot execute from the 

‘se becevse their PAR's ore only l2 
bi; The wide; they eleo have no Supervisor 
Mode. Trerefore, ell petterns are 
executed in ry Pe using User Mode 
(reference Section > v 


+ tet 


mo 
LJ i 
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7.1.2 SOB'’s 


Utilization of the full PDP-11 Instruction Set to speea pattern 
algorithms (principally the SOB). 


7.1.3 CACHE 


CACHE is used between pattern tests to decrease program pass times. 
CACHE cen be defeated by the operator (reference section 2.4.3.1). 


7.2 Bank Zero Testing 


Bank Zero hes been traditionally neglected by memory diagnostics for 
the following reason. 


The vector spece existe there and ALi traps must not sccess test 
pettern date. If the eree is tested the diagnostic must not use any 
traps. end it is egeainst the rules for power to fail. 


Systems with Memory Manegement can overcome thie because all traps ere 
to Kernel Virtuel spece even if the power should fail (caution must be 
observed beceuse power up goes to eres eddress 24 (because the 
Memory Menegement Unit comes up off)). 


However, Catch 22 is that the di tic is not APT competible in this 
mode because APT Accesses Physical Memory Locations. 


Tre POP -11/744 can over come this beceuse the UNIBUS Map can fool APT. 


Beceuse of the previous arguments this program does not relocate in 
the true since of the word (i.e. no position independent code was 
written (at least not on purpose)), but rather this program moves and 
remaps (hereafter referred to es relocetes). his enables the 
complete testing of Bank Zero or any other em spece or priv: leged 
spece exectly es ell other banks ere tested. Tre conditional test to 
see if ea bank is protected is complemented umen relocated). 


NOTE 


Tre progrem will relocete only in the 
first pase under APT; after this, the 
program will remain fixed in Banks O and 
i 
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7.3 Memory Configuration Map 


This map is printed out immediately after sizing tne memory miess swt 
is set (reference section 2.4.1). It can aleo be ¢ inted at any ister 
time in Field Service Mode (reference section 2.4.4,8.7) 


Example: 
MEMORY CONFIGURATION MAP 
16K BANKS 


: é 5 4 5 6 7 
ERRORS EET ee ree eee may Tee ese eeee ORs seme OLA IeTe TOIZES 


CPU MAP PUCTCTCTTVETTTTSTTeTTTTTeTi tity! 
INTRLV ---------------- 33333335535333535 
MEMTYPE LLLLLLLLMPPOPORRRTETETTTTErTErTrT 
CSP + errata vitae ces pene 
PROTECT PP I I 


0 2 3 4 5 6 
45670123456 70123456 70123456 70123456 7012345670123456 701234567 


Displeyed are Banks 0-75 Octal (2 meg words). If the Fet Terminel 
Switch was set (reference section moa 1) then ell Banks (0-167) nould 
be show. If this wee an 18-Bit POP-11 (eg - 11/34), only Barks 0-7 
would be printed. 

The fields: 


ERRORS: 


Tne sizing routine could not write zeros and ones in Banks 
10 € 11, hence they sre marked as bad with X's 


CPU MAP: 
Tre CPU wes able to access banks 0-37 (512 K words). 

INTRLYV: 
There is eves ane on Banks 20-37, with CSR 2 (172104) 
controlli Address Bit 1 Non-Asserted addresses, and 
CSR 3 (17 106)" controlling the Address Bit 1 Asserted 
eddresses. 

ERRORS: 

MEMTYPE: 


Banks 0-7 are Memory Type . (MS-1iL), and Banks 10-37 are 
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Memory Type M™ (MS11-M); while Banks 40-167 do not ei st. 
Memory Type K would indicate MF11S-K, Memory Type - would 
indicate UNIBUS Perity, and Memory Type 8 would indicate 
11/45-type Gipolar memory. 


CSR: 
Banks O-7 ere ass: @ to CSR 172100, 10-17 to CSR 172102, 
and 20-37 to interleaved CSR's 172104 and 172106. 

PROTECT: 


Berks 0 and 1 ere protected because they sre program space. 
Bank O and 1 can elso be protected because they are in the 
bottom 16K of an MS11-M CSR. The protection is hierarchical 
and pr em spece overshadows MS11-M protection. Banks © 
and 1 will not be tested until the progrem relocates. I¢ 


yt ? ANCE 
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any bank is protected by MS11-M Cor MF11S-K) and not because 
it is in program spece it will have an “I” typed in this 
row. This is to point out where the protected banks start 
for each ECC CSF. Note the "P” at Bank 30; This points out 
the "Shadow" protection which occurrs when two MSil1-M 
memories ere interleaved. Therefore, Bank 30 will not be 
tested until the program has relocated. 


7.4 Everything You've Always Wanted To Know About SUPERMAC ._.. 


SUPER-MAC is a set of structured programming mecros that sllows 
progrems to be written in a high level, easily understood language. 


As e genrerel rule, most SUPER-MAC statements cen be single-line 
statements or multiple-line (nested) block statements. A single-line 
stetement must be completed on one source line; no continuation lines 
ere esllowed. Single-line statements should be es short and simple es 
possible. Comments may elec be included on e source line. All the 
pot Aa rules, conditions, etc.. thet govern MACRO-11 eleo govern 

-MAC. Spacing om e source ine is very important. The elements 
should be sepersted by @ comma or e space. Tabs should never be used 
for spacing. For exemple: The expression AB is interpreted 
different than A «+ B. 


All the conditionnel stetements can be written es multiple-line nested 
blocks. Eech level of =" within e block must be terminated with 
en essociated END statement. ach level of nesting should be indented 
two speces. 


User written macros or essembly lengquege instructions may be included 
in @ progrem if desired. As ea debugging sid. if the symbol LSTS$ is 
defined, it will cause rated code and labels to be listed. All 
2) ame must in with the macro call SMACIT. ITInis call initializes 
ng egel POP-11 source and destination operands are legs! 
im SUPER - ° 
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1 Semple Source File 
-.ENABL ABS 


SUPER 
sLST8$ #0 
BITS *40 


ooooooo°o°c°o 


oO 
one 
ee 


*- ef © 


1.€ 

IF A IS TRUE 
MOV 

END ;OF 

IF 6 IS 
MOV 

END ;OF 


IF A EQ 
If ALT 


bal tea 
y> 


OwOwre Ne 

~ 

a? 

z 

or 

m 

~ 

i | 

‘ 


63 
2° 
a 


Oe ND 
Ne 


< 
em F 
@y - 
gc 


A 
ANOB CEQ 1 


2 


rm 
ee 
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ters If RESULT IS EQ 

465 MOV A,B 

th, END ;OF IF RESULT 

Save If BITS SET.IN A 

oh MOV B.C 

oth, END ;OF IF BITS 

of IF BITS OFF .IN A 

sara MOV C.0 

s47? ; ON cANOn TS'UIME MO EF STATEME 

247 - ; 
same ;ON.ERROR EXAMPLES ae ee 
3400 ON. ERROR 

sant MOV A,8 

can ELSE 

3483 END OF ON. ERROR 

BARS ON. RR 
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MOV C.8 
MOV 


A,B 
END ;GF ON.NOERROR 
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MACRO 111% 14 JAN-82 16:15 PAGE 98 


ON.ERROR THEN LET A :B_+ B 


:FOR — 


, * Sr -5 TO 23 


- 


INC 
ENO ;OF FOR I 
FOR RO :_= O T0 
DEC ACRO) 
END ;OF FOR RO 


140 BY 4 


FOR I tae — DOWNTO $3 BY 2 


ADO . 
END ;OF FOR I 
;BEGIN EXAMPLES 
BEGIN ALPHA 


FOR RO :_* OTTO 167 
MOVB ACRO).B 
IF 6 LT —"" LEAVE ALPHA 


END ;OF FOR 
FOR RO : a 


SRETURN NOERROR 
; CASE = 


F 
END ;OF CASE RO 
END 


: 400 TO 
IF 8 GE O THEN 
RO 


567 
LEAVE ALPHA 


t ry f NC 


CZMSDDO S11 ./M DIAGNOSTIC 


-MAIN. 


O@waOuU Swhre 


7.4.2 Sample Listing 
MACRO M1111 


000000 


ii 
MACRO M1113 14 JAN-82 16:15 PAGE 99 


PAGE 2 


CeHeIFONMMOOWyY 


File (with No Expanded Macros) 
O1-APR-79 16:41 p 


. SUPER 
sLST$8_ «0 
BITS «40 


cooooo°coe°o°o 


| 
a 
CZMSDDO S12 i. /™ DIAGNOSTIC MACRO M1115 14 JAN-82 16:15 PAGE 100 vt GUENCE “ 


3555 im "9 
3556 nia 
355° . 

3558 -MAIN. MACRO M1111 01-APR-79 16:41 PAGE 5 

3559 

3560 

3561 18 ;LET EXAMPLES 

3562 i9 000024 LET RO :_* A 

3565 20 9000050 LET 6 :.*C +O 

3504 21 000044 LETE :*F 6 | 
3565 22 000056 LET G:i:_*He 2 
3566 23 000072 LET Js 2 de Ol 
3567 24 000100 A :B.- 6 

5568 25 ;IF EXAMPLES 

3569 26 000106 IS TRUE 

3570 27 000114 012737 000023 000006 MOV 23,0 

3571 26 000122 i IF A 

3572 29 000122 If 6 IS FALSE 

3573 30 000130 012737 000034 000010 34,€ 

3574 31 000136 END ;OF IF B 

3575 000136 IF A EQ B THENLET C :_+ OD 
3576 33 000154 IF ALT B 

3577 34 000164 013737 000004 000006 c,0 

3578 35 000172 ELSE 

3579 36 000174 013737 000010 000006 E.0 

3580 37 900202 END ;OF IF A 

3581 38 000202 IF A EQ B AND C NE D 
3582 39 000222 013737 O00012 000014 FG 

3563 40 000250 E ; IF A 

3584 41 000230 IF A EQ B OR C NE DO 
3585 42 000250 013737 000012 000014 F.G 

3586 43 000256 END ;OF IF A 

3587 44 000256 IFB AEG B AND CEQ 1 
3586 45 000276 013737 000016 000022 MOV 6,J 

3589 46 000504 ELSE 

3590 47 000306 015737 900010 000022 MOV €E.J 

3591 48 000314 END ;OF IF 

3592 49 000314 IFB A EQ SB ANDB CEQ 1 
3593 50 000334 013737 000016 000022 MOV HAJ 

5594 Si 000342 cL 

3595 S2 000344 015737 000010 000022 MOV €E.J 

3596 53 000352 END ;OF IFB A 

3597 54 000352 IF RESULT IS EQ 
3596 55 000354 013737 000000 000002 MOV 8 6A.B 

3599 56 000362 END ;OF IF RESULT 
3600 57 000362 IF BITS SET.IN A 
3601 58 000372 013737 000002 000004 MOV 6.C 

3602 59 000400 END ;OF IF BITS 
3603 60 000400 IF 8ITS OFF .INA 
3604 61 000410 013737 000004 000006 MOv C.0 

3605 62 000416 ENO ;OF IF BITS 
3696 63 sON.ERROR IS LIKE AN IF STATEMENT ON THE C-B8IT 
3607 64 ;ON.ERROR EXAMPLES 

3608 65 000416 ON. ERROR 

3609 66 000420 0153737 000000 000002 MOV A,B 

3610 67 000426 ELSE 


3611 68 0004350 013737 000004 000002 MOv C,8 


CZMSODO 


S612 
5615 
S614 
5615 
5616 
8417 


an 


‘ss 


. 
> 


4 


™M DIAGNOSTIC 


MACRO M1115 


i4 


69 
70 
71 
72 
73 
74 


JAN -82 


16:15 PAGE 


My 


100-1 


013737 000004 000002 
000000 000002 


013737 


tte ee ae 


ee 


-_— EA A OK 


END ;0F ON. ERROR 


ON . NOE RROR 
MOv C.B 
FL SE 


MOV A,B 
END ;OF ON. NOERROR 


JE QUENCE 


ee 


9D 


—_— 


2. wee oe ee 


CZMSODO MS11-L/M DIAGNOSTIC 


MACRO M1113 14 


MACRO Milli 


000456 


005237 


005360 


063737 


116037 


NY 


-JAN-82 16:15 PAGE 101 


000000 


000000 000002 


SEQUENCE 


Page 80 


O1-mPR-79 16:41 PAGE 3-1 


ON.ERROR THEN LET A :B «+ B 
;FOR EXAMPLES 
FOR I ‘a8 -5§ TO 23 


FOR RO :_* O70 140 Br 4 
RO) 


RO 
FOR I ‘= Pia DOWNTO 3 6Yr 2 
END ;OF FOR I 
;BEGIN EXAMPLES 
BEGIN ALPHA 
FOR RO :_= OTO 167 
MOvV8 ACRO).B 
IF 8 LT O THEN LEAVE ALPHA 
END ;OF FOR RO 
FOR RO :_= 400 T0 567 
IF 6 GE O THEN LEAVE ALPHA 
END ;OF FOR RO 
ALPHA 


SRETURN NOERROR 
;CASE EXAMPLES 
MO A,.RO 


v 
CASE RO 
A 


91 


CZMSODO S11 


» 


™ DIAGNOSTIC 


MACRO Mi11" 14 


7.4.5 
.MAIN. 


ad 
KOwVeasPYV awh 


JAN-B2 16:15 


000000 


000000 


sie 
PAGE 102 


Semple Listing File (with € 
MACRO M1111 


CH TFO NOOO YS 


apended Mecros ) 
01-APR-79 16:10 PAGE 2 


-ENABL ABS 


. ENABL 
-MCALL 
SUPER 


LST$$ 0 
BITS +40 


eooooooo°o°o 


Page 61 


_t a a ae 


CZMSDD0 S11 1. -°M DIAGNOSTIC 


MACRO M1118 14 


39 
40 


oe 


JAN-82 16:15 PAGE 10% 


MACRO M1111 


013700 


013737 
063737 


013757 
005237 


013737 
062737 


062737 
113737 


012737 


005737 
001005 
012737 
023737 
0010035 
013737 
023737 
002004 
013737 
000403 
013737 


001403 
013737 


01-APR-79 


000012 


000014 


(16:10 PAGE 3 


sLET EXAMPLES 
LET 


MOVE 
; IF —. 


Li: 


Le: 


L53: 


L4: 


Page 6 


IF IS TRUE 
- 


Vv 34.E 
END ;OF IF B 


IF A = 8B THEN LET C :_ 


.) 


J QUENCE 


rye 
Bre 
CZMSODO S11 L-™ DIAGNOSTIC MACRO M1115 14 JAN-62 16:15 PAGE 103 1 AGENT 


£744 0002 30 1S: 

8745 41 000230 If AEG BOR © NE D 
374e 000230 023737 9000000 000002 CMP A.B 

374° 000236 001404 BEG .6 

3748 000240 023737 000004 000006 CMP C,0 


"7°49 000246 001405 BEQ i.7 


Et 


CZMSODO Siti ./-™M DIAGNOSTIC MACRO M1113 14 JAN-62 16:15 PAGE 104 QOENCE 
3751 ” he! 
3752 ™_ 
3755 . 

Le -MAIN. MACRO Milll 01 -APR-79 16:10 PAGE 3-1 

3756 

37s? 000250 6: 

3758 42 000250 013737 OOO0012 000014 MOV F .G 

$75 43 000256 END ;OF IF A 

3760 000256 7: 

3761] 44 000256 IF6 AEG B AND CEQ i 
2762 000256 123737 000000 000002 CMPB A.B 

$763 000264 001010 BNE LIO 

3764 000266 023727 000004 000001 cep =. i 

3765 000274 001004 BNE 110 

3766 45 000276 013737 000016 000022 MOV 4H.J 

3767 46 000304 Ei SE 

3766 000304 000403 BR Lili 

3769 000306 L10: 

3770 47 000306 013737 000010 000022 MOV E.J 

3771 48 000314 END ;OF IFB A 
3772 000314 Lil: 

3773 49 000314 IF8 AEG B ANDB CED 1 
3774 000314 123737 3G00000 000002 A,B 

3775 000 001010 BNE Li2 

3776 000 123727 000004 000001 CoMPB Cc. 1 

3777 000332 001004 BNE L 

3778 50 000334 013737 000016 000022 MOV OA 

3779 51 000342 ELSE 

3780 000342 000403 BR L153 

3781 000344 Lil2: 

3782 S52 000344 013737 000010 000022 MOV E.J 

3783 53 000352 END ;OF IFB A 
3784 000352 L1i3: 

3785 54 000352 If RESULT IS EG 
3786 000352 001003 BNE 114 

3787 55 000354 0613737 000000 000002 MOV A.8 

3788 56 000362 END ;OF IF RESULT 
3789 000362 L114: 

3790 57 000362 IF BITS SET.IN A 
3791 000362 032737 000040 000000 SIT BITS,A 

3792 000370 001403 BEG L15 

3793 $8 000372 013737 9000002 000004 MOv 6.C 

3794 S39 000400 END ;OF IF BITS 
3795 0060400 L1i5: 

La 60 000400 IF BITS OFF .IN A 
3796 000400 032737 000040 000000 BIT BITS.A 

3799 000406 001005 BNE L16 

coon 61 000410 013737 000004 000006 MOV c.0 

3802 62 000416 END ;OF IF BITS 
3803 000416 L16: 

3804 65 :;ON.ERROR IS LIKE AN IF STATEMENT ON THE C-8IT 
3805 64 ;ON. ERROR EXAMPLES 


3806 65 000416 ON . ERROR 
3807 000416 103004 BCC L117 


CZMSD00 MS11 


L/M DIAGNOSTIC 


MACRO M1113 


i4 


66 
67 


68 
69 
70 


JAN - 82 


Fé 


16:15 PAGE 104-1 


013737 
000405 


013737 


000000 000002 


000004 000002 


Li?:; 


MOV C.8 
END ;OF ON. ERROR 
ON . NOE RROR 


AGA rect 


thd 


CZMSDD0O MS11-./™ DIAGNOSTIC 


MACRO M1115 i4 


91 


f 


re 


JAN-62 16:15 PAGE 105 


MACRO M1111 


103404 
013737 


000403 
013737 


103003 
113737 


012737 
005237 
005237 
023727 
003770 
005000 
005360 
062700 
020027 
003771 


012737 
063737 


162737 
023727 
002366 


01-APR-79 


060004 


000000 


000002 


177773 
000000 


000020 
000020 


000002 


000023 


16:10 PAGE 3-2 


BO: 


EO: 


Bi: 


El: 


E2: 
;BEGIN EXAMPLES 
BEG 


83: 


84: 


Page 64 


BCS Lei 


MOv C.B 


ELSE 
BR L22 

MOV A.B 
END ;OF ON.NOERROR 
ON.ERROR THEN LET A :8 «- B 
BCC L23 
MOVS B,A 


L2s: 
sFOR EXAMPLES 
FOR I 


MOV -5.I 


FOR RO :.* OTTO 140 BY 4 


FOR I :_= 133 DOWNTO 3 BY 
133,1 


ADD (ALB 
END ;OF FOR I 
SUB ‘ 


Cer I, 3 
8GE B2 


IN ALPHA 


CLR RO 


Jt GENCE 


> 
« 


MOVB ACRO),.B 
IF B i.T O THEN LEAVE ALPHA 


TST B 
a.T €3 
END ;OF FOR RO 


mie 


DOC MSIL .-™ DIAGNOSTIC MACRO ML1I1L® 14 JAN-62 16:15 PAGE 105 1 GANT 
000604 005200 INC RO 
000606 020027 000167 CMP RO, 167 
000612 0035766 . BLE 84 
000614 £4; 
FOR RO : *« 400 TO SA” 


92 000614 
000614 012700 000400 “Ov 400,PR0 


fe’ 


CZ7MSODO S11 ./™ DIAGNOSTIC MACRO M1115 14 JAN-4? 16:15 PAGE 106 JE QUENCE 
3885 w a 
884 ” 
3885 
cone -MAIN. MACRO M1111 0O1-APR-79 16:10 PAGE 3-3 

7 
3888 
3889 000620 BS: 
3890 93 000620 If 6 GE © THEN LEAVE AL PHA 
3891 000620 005737 000002 TST 8 
3892 000624 00 BGE 
3895 94 000626 END ;OF FOR RO 
7AQ4 000626 005200 I 
5895 000630 020027 000567 CMP RO, 567 
389 000634 003771 BLE 85 
3897 0006 36 ES: 
3498 95 000636 END ALPHA 
3899 0006 36 e3; 
3900 96 1 SRETURN EXAMPLES 
3901 97 000636 $RE TURN 
3902 000636 000207 RTS PC 
3903 98 000640 SRETURN ERROR 
© IOS 000640 000261 SEC 
3905 000642 000207 RTS PC 
3906 99 000644 SRETURN NOERROR 
3907 000644 000241 cic 
2908 000646 000207 RTS PC 
3909 100 ;CASE EXAMPLES 
3910 101 000650 013700 000000 MOV A,RO 
3911 102 000654 CASE RO 
3912 000654 010046 MOV RO, -(SP> 
3913 000656 006316 ASL @sP 
3914 000660 004737 000700 JSR PC,L24 
3915 103 000664 000000 A 
3916 104 000666 000002 8 
3917 105 000670 000004 Cc 
3918 106 000672 000006 0 
3919 107 000674 0600010 P 
3920 108 000676 000012 F 
3921 109 000700 END ;OF CASE RO 
5922 000700 L246: 
3923 000700 062616 ADO (SP)+.asP 
3924 000702 013646 MOV @(SP)-, -(SP) 
3925 000704 004736 JSR PC. aCSP)- 
3926 110 


3927 111 000001 .ENO 


CZMSDDO MS11i ./M DIAGNOSTIC 


*929 


MACRO M1114 


7.5 Memory Management Mapping 


Foetal 


NOU SWwlro : 


Perif Page 


JS 


14 JAN-82 16:15 PAGE 107 


Memory Management Mapping for Tre 11/44 
SUPERVISOR 


Page 86 


Ost Be /Fst 
Sre Bk /Fst 
Sre Bk /Fst 
Sre Bk /Fet 
Ost Bk /Fet 
Dest Bk /Fst 
Ost Bk/Fst 
Dst Bi /Fst 


SEQUENCE 


SgSgeS ss 


7.5.2 Memory Management Mapping For UNIBUS-11's With Supervisor Mode (eg 11/45) 
SUPERVISOR 


' vO 
3 


WOU & wr O 


. 2 
i 


SAU WhO 


__-_—s *- = «& 


USER 

Progrem/Dst Bk 
Program/Sre Bk 

Pr am/Sre Bk 
Test Area/Sre Bk 
Test Area/Det Bk 
Test Area/Dst Bk 
Test Aree/Dst Bk 
Peri f Page/Dst Bk 


USER 


e 
PRELP LLL 


00 


\< 4 


CZMSD00 MS11 1. /™ DIAGNOSTIC MACRO M1113 14 JAN-82 16:15 PAGE 108 SEQUENCE 101 
3976 000000 -ENABL ABS 
3977 -ENABL AMA 
$978 .OSABL GBL 
3979 ;NOTE: CZMSDD.SML IS THE SUPER.MAC SOURCE AND IS RELEASED age ret 
3980 ;THIS PROGRAM. ALL THESE .MCALL STATEMENTS REFERENCE THAT FILE. 
3981 .MCALL SMACIT,..PUSH,..POP,..TAG,..BRAN -EMIT, .EMITN, .EMITL, .EMITR 
3982 -MCALL . IFOPR,. 1S, .GENBR, .OPADD, -OPSUB, CLEAR, SET, CLEARS, SETB 
39853 -MCALL RNE,REQ.RLT.RGE, RGT, RLE, RPL, RMI ,RHI .RLOS ,AHIS, RLO, RCS,RCC 
39638 -MCALL IF, OR, . IFARI, .LEAVE, .GOT 0, OR, AND , THEN, ELSE , WHILE CASE 
3985 “MCALL FOR,TO, DOWNTO, REPEAT, UNTIL, THRU, END. BEGIN 
3986 -MCALL $8END,LEAVE, JUMPTO, GOT 0,PUSH,POP, LET 
3987 -MCALL SIMPLE, .ARITH, ORB , ANDB , IFB,UNTILB, WHILEB, ON . ERROR , ON. NOERROR 
hee “MCALL §$CALL, $RE TURN 
989 
3990 -NLIST TIM 3I WANT FAT PAPER! 
3991 A257. SYM sLIST MACRO CALLS, SYMBOL TABLE 
3992 -NLIST M™O,CNOD,ME ;D0N'T LIST MACRO DEFS € aes E EXPANSIONS 
3995 sLST8$- O ‘DEF INED TO LIST SUPERMAC EXPANSIONS 
3994 163000 $SWR= 163000 ;USE THESE SYSMAC SWITCHES 
5995 00000 1 $TN= 1 sFIRST TEST NUMBER TO ONE(1) 


‘ 


oo Thads L/™ DIAGNOSTIC MACRO M1115 14 JAN-82 16:15 PAGE 110 SE GUE NCE 


§999 .SBTTL DEFINE TRAPS 
4000 ;ALL ENTRIES HERE MUST HAVE A CORRE SPONDING ENTRY IN THE 
4001 ;TRAP TABLE “$TRPAD” (NEAR END OF PROGRAM 
400. ;@TRAP DEFINITIONS 
400 
4004 HERE IS HOW TRAPS WORK IN THIS PROGRAM 
4 
4006 TALL TRAPS EXECUTE A “TRAP” INSTRUCTION WHICH TAKES THE PROGRAM 
4007 :TO0 SYMBOLIC LOCATION “$TRAP” 
4 
4009 SAT $TRAP THE PROGRAM PICKS UP THE RIGHT BYTE OF THE TRAP INSTRUCTION 
4010 ;AND INDEXES INTO A TABLE AT LOCATION “S$TRPAD” WHICH SENDS THE PROGRAM TO 
4011 ;THE SPECIFIC ROUTINE TO HANDLE THAT SPECIFIC TRAPS TASK. 
4012 3 
4015 ; THE ULTIMATE DESTINATION OF A TRAP INSTRUCTION CAN BE GUESSED AT AS FOLLOWS 
401 H 
4015 ; EXAMPLE: NOP 
4016 ; NOP 
4017 : NOP 
4018 ; KERNEL sENTER KERNEL MODE 
so : 
i 
4021 ; ADD A DOLLAR SIGN TO THE SYMBOLIC NAME AND CHECK THE CRF FOR SOMETHING CLOSE 
4022 ; IN THIS CASE THE CRF HAS $KERNE LISTED AS 032546 
4028 : AT LOCATION 32546 YOU FIND THE ROUTINE $SKERNEL 
a 
4025 : NOTE THAT CRF SYMBOLS ARE TRUCNATED TO 6 CHARACTE 
4026 : SYMBOLIC NAMES GREATER THAT 6 CHARACTERS ARE ARE USED. <0 I CAN 
4027 ; REMEMBER WHAT THEY MEAN! 
4029 ; ALL GOOD TRAP ROUTINES RETURN VIA AN “RTI” INSTRUCTION 
4030 104401 TYPEIT= 104401 saTTY TYPEOQUT ROUTINE 
4031 104402 TYPOC= 104402 :;TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
4032 104403 TYPOS= 104403 ss TYPE OCTAL NUMBER (NO LEADING ZEROS) 
4033 ;TYPON= 104404 ::TYPE OCTAL NUMBER (AS PER LAST CALL) 
4034 104405 TYPDS= 104405 3: TYPE DECIMAL NUMBER (WITH SIGN) 
4035 :TYPBN= 104406 ;3TYPE BINARY (ASCII) NUMBE 
4037 104407 GISWR= 104407 :1GET SOFT-SWR SETTING 
4038 104410 CKSWR= 104410 ;3TEST FOR CHANGE IN SOFT-SWR 
4040 104411 RDCHR= 104411 :sTTY TYPEIN CHARACTER ROUTINE 
4041 104412 ROLIN= 104412 33TTY TYPEIN STRING ROUTINE 
4042 104413 RDOCT= 104413 ;;READ AN OCTAL NUMBER FROM TTY 
4043 104414 RODEC= 104414 ;:READ A DECIMAL NUMBER FROM TTY 
4045 104415 SAVREG= 104415 ;:SAVE RO-RS ROUTINE 
4046 104416 RESREG= 104416 ; RESTORE RO-RS ROUTINE 
4048 104417 KERNEL*= 104417 ;ENTER KERNEL MODE 
4050 104420 ENERGIZE = 104420 ;TURN ON MEMORY MANAGEMENT & TRAPS 
4051 104421 DEENERGIZE =104421 ;TURN OFF MEMORY MANAGEMENT & TRAPS 
— 104422 KMAP= 104422 sMAP KERNEL 1 TO 1 
4054 104423 CACHON= 104423 ;TURN ON CACHE 
4055 104424 CACHOFF =104424 sTURN OFF CACHE 


CZMSODO a 22 a ‘™ DIAGNOS 


DE* INE 


TR 


TICc 


MACRO M1115 


LOADCSR+104425 
READCSR «104426 


PERROL= 104427 


ECCDIS= 104470 
ECC101S*104471 
ECCINIT 104472 


ECCLINIT=104475 
CBCSR= 104474 


504 
CHK1DIS-104505 
ENASBE= 104506 
ENA1SBE =104507 
TSTREAD=104510 
INVALIO=104511 
ERRGEN *104512 


14-JAN-62 16:15 PAGE 


M i 
a 


110-1 


;LOAD CORRECT CSR 
sREAD CORRECT CSR 


sPROGRAM DETECTED 
sPROGRAM DETECTED 
sPROGRAM DETECTED 
sPROGRAM DETECTED 





PROGRAM DETECTED 
sOISABLE ECC ON ALL CSR‘S 


sDISABLE ECC 

s INITIALIZE 

‘INITIALIZE 1 1 SELECTED ECC CSR 
GENERATED 


ON 1 


ERROR 


SELECTED CSR 
SR‘S 


ALL ECC C 


CHECKBITS IN ALL CSR‘S 


ITE 
sWRITE GENERATED ag oe gtk IN 1 SELECTED CSR 


;WAS THERE A SBE ON ANY CSR? 

sWAS THERE A SBE ON i SELECTED CSR? 
;WAS THERE A DBE ON ANY CSR? 

;sWAS THERE A DBE ON 1 SELECTED CSR? 
:;CLEAR ALL CSR’ 





sDISABLE ECC € WRITE CHECKBITS FROM 1 SELECTED CSR 


S 
SELECTED 
€ WR 


CSR 
ITE CHECKBIYS FROM ALL CSR'S 


sENABLE TRAPS ON SBE'S FROM ALL CSR'S 


3 CHE 


ENABLE 
sTEST LOC (R1) 

sINVALIDATE BACK 
CK ERROR ADDRESS 





TRAPS ON 
€ 


SBE‘S FROM 1 SELECT 


ED CSR 
TST Ay oe (WITHOUT FETCHES ) 
GROUND P 


TTERN ON “BANK 


ns $e ee ee ene © ome 


9E QUENCE 


cl 
39 2 


7 


CZMSODO MS11-L/M DIAGNOSTIC 
DEFINE BASIC PDOP11 STUFF 


4114 
4115 
4116 
4117 
41168 


000004 
177776 


177570 
177570 
177546 


N& 


MACRO M1115 14-JAN-82 16:15 PAGE 111 SEQUENCE 


.SBTTL DEFINE BASIC POPi1 STUFF 
;*INITIAL ADDRESS OF THE phe os POINTER 


STACK= 2000 :sFIRST ADDRESS OF THE STACK 
KERSTK= STACK ;;KERNEL STACK 
SUPSTK= 740 Pie ge STACK 
USESTK= 700 i3 TACK 
ERROR =EMT tt easIc DEFINITION OF ERROR CALL 
SCOPE =IOT ;:;B8ASIC DEFINITION OF SCOPE CALL 
PSwW= 177776 ;sPROCESSOR STATUS WORD 
;STKLMT"177774 +;STACK LIMIT REGISTER 
sPIRQ= 177772 + sPROGRAM INTERRUPT REQUEST REGISTER 
DSWR= 177570 ; sHARDWARE SWITCH REGISTER 
DDISP= 177570 ; sHARDWARE DISPLAY REGISTER 
LKS= 177546 | ;LINE CLOCK (KW11-L) STATUS REGISTER 
SeneSCRs AES DEFINITIONS 
1i :;CODE FOR HORIZONTAL TAB 

+ 12 | CODE LINE FEED 
CR= 15 ::CODE CARRIAGE RETURN 
CRLF= 200 +:CODE FOR CARRIAGE RETURN-LINE FEED 
MFPT = 7 ;;CODE FOR PROCESSOR TYPE INSTRUCTION 
;*GENERAL PURPOSE REGISTER DEFINITIONS 
3SP=R6 3:STACK POINTER 
;KSP=SP ;KERNEL STACK E 
SSP =SP ; sSUPERVISOR STACK POINTER 
USP «SP 33 STACK 
;PC*R7 3:PROG°AM COUNTER 
3@”"SWITCH REGISTER” SWITCH DEFINITIONS 
SW15= 100000 
SW14= 40000 
SWi3= 20000 
SW1l2= 10000 
SWil= 4000 
Sw10= 2000 

= 1000 
SWB 400 
SW7= 200 
SW6 = 100 
SW5= 40 
SwW4 = 20 
SW3- 10 
SW2= a 
SWi- 2 
SWO= 1 
;*DATA BIT DEFINITIONS (BITOO TO BIT15) 
BITiS= i 
BITi4= 40000 
BIT13= 20000 
BITi2= 10000 
BITil= 4000 
BIT10= 
BIT9= 1000 


104 


4171 


MS11 


CZMSODO L/™ DIAGNOSTIC 
DEF TNE Basic POPI1 STUFF 


000200 
000100 
000040 
000020 
000010 
000004 


000002 
000001 


000004 
000010 


de 
bi , 


MACRO MLI13 14 JAN-82 16:15 PAGE 111.1 é 









Bliv- 200 

BITé6- 100 

B1TS- 40 

BIT4. 20 

BITS. 10 

BIT2- 3 

BITi- 2 

BITO- 1 

:@BAST= “CPU~ TRAP _— aah ae be 

ERRVEC= 4 TIME OUT AND OTHER ERRORS 
RESVEC+ 10 | pRE SERVED AND ILLEGAL INSTRUCTIONS 
; T@ITVEC-14 33°" BIT 

; TRIVEC= 14 33 TRACE TRAP 

;BPTVEC= 14 : ;BREAKPOINT TRAP (POT) 
IOTVEC= 20 ; pINPUT/OUTPUT TRAP (IOT) eeSCOPEee 
PURVEC= 24 ; ;POWER FAIL 

EMTVEC= 30 de: ~ ol TRAP (EMT) esERRORes 
TRAPVEC = 34 33 °TRAP* T 

TKVEC= 60 sa TTY KEYBOARD VECTOR 

sTPVEC> 64 33 1TY PRINTER VECTOR 

sLKVEC* 100 sal IME CLOCK (KW11-L) VECTER 
eoreotee . ;;CACHE ERROR INTERRUPT vFCTOR 
sPIRQVEC=240 ;;PROGRAM INTERRUPT REQUEST VECTOR 
MMVEC = T vECTOR 





250 3 MEMORY 

.SBYTTL O€FINE CACHE REGISTERS 
ACHE ERROR REGISTER 

Y ¥ comee. REGISTER 


INTENENCE REGISTER 
sMITMIS = 177752 sahMIT MISS REGISTER “1~ IMPLIES HIT IN CACHE 
DATARG + 177754 + :OATA REGISTER 


-SBTTL DEFINE CPU REGISTERS 
CPUERR = 177766 3;CPU ERROR REGISTER HOLDS CONDITION THAT CAUSED 


-SBTTL OfFINE MEMORY MANAGEMENT REGISTERS 
eMEMORY MANAGEMENT STATUS REGISTER ADDRESSES 








sUIPOR7T« 177616 

1*USER “D” PAGE DESCRIPTOR REGISTORS 
s UDPDRO=- 177620 
; UDPORi - 177622 


; UDPOR2 = 177624 


eye 


~~ 


SEF TRE MEMORY MANAGEMENT ReGrsTeRS 1 AN Be TOs1) PAGE 21h 


177676 


172200 


172240 


172246 


172252 
172254 


177626 
177650 
177632 
177634 
177636 


s@USER “I” PAGE ADDRESS REGISTERS 


FASTCITY«UIPARO 
UIPARO= 177640 


3 ARG= 
UDPAR7T= 177676 


177656 


sPATTERN PROGRAM SPACE 


sPATTERN PROGRAM SPACE 
sPATTERN PROGRAM SPACE 
sPATTERN PROGRAM SPACE 


“D” PAGE ADDRESS REGISTERS 


sPATTERN PROGRAM 


: 
sPATTERN PROGRAM 


s*@SUPERVISOR “I” PAGE DESCRIPTOR REGISTERS 


SIPORO= 172200 





SIPARG= 172254 
s;SIPAR7= 


172242 
172244 


172250 


172256 


s;TEST AREA 
;TEST AREA 
;TEST AREA 
; TEST AREA 


4 4 a nS 


“ 


ryt 4 
aoe 
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172260 


172272 
172274 
172276 


172300 


172340 


172350 
172352 
172554 


172360 


172374 
172376 


s@SUPERVISOR “D” PAGE ADDRESS REGISTERS 
SDPARO+ 172260 


; SOPAR | + 172262 
1 SOPAR2« 172264 
; SOPAR $+ 172266 
3 SDPAR4 + 172270 


SOPARG= 172274 
SDPAR7= 172276 


;@KERNEL “I” PAGE DESCRIPTOR REGISTERS 
KIPDRO- 172300 


:KIPORI = 172302 
iMIPOR2- 172304 
;KIPORS= 172306 
sKIPOR4 = 172310 
s<IPORS= 172312 
7K IPOR6= 172314 
:KIPDR7= 172316 


:*KERNEL “D” PAGE DESCRIPTOR REGISTERS 
1723206 





354 
sKIPART«< 172356 


: AR Ye 172362 
sKDPAR2= 172364 
sKDOPARS= 172366 
7 KDPARS = 172370 
sKDPARS« 172372 
KDPARG: 172374 


KDPAR7T= 172376 


Jf 4 s NCE 


MACRO M1113 i4 


-Y 
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.SBTTL DEFINE UNIBUS MAP REGISTERS 


;¢THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED ‘MAP. yx 


sane UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED MAPHxx 


170352 


TE GE CE 


CZMSODO MS11 
DEFINE UNIB 


L/M DIAGNOSTIC 
US MAP REGISTERS 


000174 
000176 


172100 


060000 
157776 


040000 


- 
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170354 
170356 
170360 
170362 
170364 
170366 
170370 
170372 
170374 
170376 


-SBTTL DEFINE 
DISPREG*174 
SWREG= 176 


-SBTTL OEFINE 
CSRADD 172100 


.SBTTL O€FINE 
FIRST =60000 
LAST*157776 
SIZE «40000 


SOFTWARE SWITCH € DISPLAY REGISTERS 


CONTROL STATUS REGISTERS 


PARAMETERS 
:START OF THE 16K TEST PATTERN AREA 
;END OF THE 16K TEST PATTERN AREA 
:SIZE OF THE 16K TEST PATTERN AREA (FOR SOB INSTRUCTIONS) 


(54 


™ T MACRO M 5 14 JAN-82 16:15 PAGE 115 SE QUENTE 

SER? Biblnk PegtoNosT#C weno mat 

4421 -LIST MD ;BE NICE TO SEE My DEFINITIONS 

4422 .SBTTL MACRO FATAL 

4423 pP@eseseesessesessesseses FATAL eeeesesesseeeseeseseesseessesese 

aos H 

4425 ;sFATAL IS USED TO REPORT FATAL ERRORS (ERRORS THAT PREVENT 

4426 8 THE PROGRAM FROM CONTINUING). 

4427 

pen cena abetbibieniadeesessccocesecendsunes 

4429 .MACRO FATAL. ARG 3 @@ MACROS es eMACROe e eMACROecee 

4430 -NLIST 

4431 .DSABL CRF 

4432 .IIF OF LST$$8 .LIST ME 

4433 -ENABL CRF 

4434 .LIST 

4435 INC FATAL S$ ;SET FATAL INDICATOR 

4436 ERROR «ARG 

4437 ._OSABL CRF 

4436 .IIF OF LST$$ .NLIST ME 

4439 -ENABL CRF 

4440 . ENDM FATAL 

4441 

4442 .SBTTL MACRO TYPE 

4445 -MACRO TYPE ARG 

4444 -NLIST 

4445 .OSABL CRF 

4446 -LIF OF LSTS$ .LIST ME 

4447 -ENABL CRF 

4448 -LIST 

S445 .IF 8B ARG 

4450 TYPEIT 

4451 . IFF 

4452 TYPEIT ~,ARG 

4453 . ENDC 

4454 -OSABL CRF 

4455 .IIF OF LSTS$ .NMLIST ME 

4456 ENABL CRF 


4457 -ENOM = TYPE 


oe ee, 
CZMSDDO MS1i1i L-M DIAGNOSTIC MACRO M1115 14 JAN-82 16:15 PAGE 117 SEQUENCE iil 
MACRO NEWIST 


4460 .SBTTL MACRO # £.'NEWTST 
4461 sO OSOSHEEEHEESESEEEEOEOO NEWTST eeesesesoeseseeseeeeess 
446. sNEWTST IS VSED AS THE FIRST INSTRUCTION OF A TEST. 
446° sIT WILL: 
4464 :1) GENERATE A TEST NUMBER FOR THE LABEL OF THIS TEST 
4465 :2) PUT STARS BEFORE AND AFTER A MESSAGE 
4466 ; ARGUMENTS 
446” 7:1) ASCII -- THIS IS THE MESSAGE THAT WILL APPEAR 
4468 $ ON THE LISTING 
4469 :2) ICOUNT -- IF NON-BLANK AND BIT 11 OF $SWR +- 1 IT WILL BE 
4470 ; THE NUMBER OF ITERATIONS TO MAKE = THIS TEST 
4471 33) RETURN -- IF NON-BLANK WILL BE THE ADDRESS 7 
4472 : WHICH THE NEXT SCOPE STATEMENT eu 
4473 ; LOOP BACK TO. 
4474 34) COMAND -- IF NON-BLANK WILL BE THE FIRST 
4475 3 od ay «Ady OF THE TEST 
4476 ; IF BLANK SCOPE WILL BE THE 
4477 Presi INSTRUCTION 
4478 , etndnneteibia aE hat eaten kibbesddanaereanence 
4479 -MACRO NEWTST ASCII, ICOUNT,RETURN, COMAND 
4480 sSTNe1 
4481 tNWTST=O 
4482 .NLIST MC 
4483 .IF 8 <COMAND> 
pr + SNEWTEST \GT™N, <ASCII>, SCOPE 
4486 $SNEWTEST \$TN,<ASCII>,<COMAND> 
4487 . ENDC 
-NLIST 
4439 -LIST ME 
4455 LIST 
4491 .IF NE 4000€8SWR 
4492 .IF NB ICOUNT 
4493 -IF LE <ICOUNT-1> 
4494 MOV @1,8TIMES 3:00 1 I ‘ERATION 
4495 . IFF 
Sd ge, MOV @ICOUNT,STIMES ;;:00 ICQUNT ITERATIONS 
4497 . ENODC 
4498 . ENOC 
4499 .IF NB RETURN 
4500 MOV ORETURN,SLPADR ;;SET SCOPE LOOP ADDRESS 
4501 - ENDC 
4502 E 
4503 -NLIST 
4504 tist Ee 
4505 LIST 


ZMSODO MS11 L/™ DIAGNOSTIC 


C 
MACRO 


4510 
4S$1i1 


SSNEWTEST 


| *4 
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.SBTTL MACRO SSNEWTEST 

-MACRO S$SNEWTEST A, ASC ,COMND 
. IRP ASCI,<ASC> . 

.IF EQ SNWITST 


SNWTST +1 

.SBTTL. T'‘A’ ASCI 

-NLIST 

.LIST ME 

LIST 
SF SPSSSSSSSSSSSSSSEESSSESESESSESSESEHESSESSEEEEESSEEEEEEEEEEEEEEESEEEEEEEEEEEE HEHEHE REEEEE 
;@TEST A ASCI 

IF F 

ASCI 

. ENDC 
§F SSSSSSSHSSSSSSSSSESSESSESESEESESSESSEESSEEEESSEEEEEEEESEEEEEEEOEEEEEEESESESEBASEEEEOE 
TST’'A: COMND 

-NLIST ME 

STN=8TNel 


-ENDM &s$NEWTEST 
-SBTTL MACRO SUBTST 


peeeseseseseses SUBTST secsececeesesecesesescsesesesseses 


; 

sTHIS MACRO WILL FORMAT A SUBTEST HEADING WITH STARS 

;A .SBTTL WILL BE FORCED € .NLISTED FOR THE TABLE OF CONTENTS. 
; 


3 ARGUMENT : 
31) TXT -- THIS IS THE MESSAGE THAT WILL APPEAR IN THE TABLE OF CONTENTS € LISTING. 
é 
; EXAMPLE : SUBTST <<THIS IS A FUN SUBTST>> 
| Mebebaeneadneseebensdbenatnbasnosccesecosonesscense 
‘ SUBTST ASCII 
$SUBTST <ASCII> 
-LIST MC 
-ENDOM SUBTST 


£S FSSSSSSSSSSSSESESSESHSSSESSEHSSSESSESHSHESSHSSSSSSSSHEHSESSESESESSESSSSESSESSEASSEHESESDESEEEE 


3 *SUBTEST ASCI 
ENDM 


§ SSSSSSSSSSSSSSESSSESSASSESOSESSHSESESECASSSSSSEESSHSSSSSSESHESSSHEESESSESESHESESESSHSESEEEEEES 


-NLIST 
-ENDM ‘sSUBTST 


JY 
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MACRO TyYPOCT 
4565 .SBYTTL MACRO TrPoCcT 
4566 ps eeseseesesesesescesesse TYPOCT sesessessesereseseeees 
456° 
4568 ;TYPOCT IS USED TO CHANGE A BINARY NUMBER 
ake ; TO A 6 DIGIT OCTAL NUMBER AND TYPE IT 
a 
4571 S ARGUMENTS : 
4572 ; 
p24. 31) NUM THE NUMBER TO BE TYPED 
4574 3 
oxaa 32) REMARK ALLOWS A COMMENT TO BE MADE 
4576 ; 
ph ;sROUTINES REQUIRED 
: 
on 31) CONVERT BINARY TO OCTAL AND TYPE (.$TYPOCT) 
4 ; 
pea 2) TYPE AN ASCIZ STRING (.8TYPE) 
4 : 
4583 ;EXAMPLES: 
4584 : 
4585 31) TYPOCT WHILMT,<TYPES THE CONTENTS OF HILMT> 
pea 32) TYPOCT #5, <TYPES ‘ 000005 ' 
4588 a csuneusunues 
4589 
4590 -MACRO TYPOCT NUM,REMARK 
4591 -NLIST 
4592 -OSABL CRF 
4593 -IIF OF LSTS$ .LIST ME 
4594 .ENABL CRF 
4595 -LIST 
4596 MOV NUM, -C SP) ;:;SAVE NUM FOR TYPEOUT 
4597 -IIF NB <REMARK >, ; sREMARK 
4596 TYPOC 33:GO TYPE--OCTAL ASCIICALL DIGITS) 
4599 -OSABL CRF 
4600 .IIF OF LST&$ .NLIST ME 
4601 ENABL CRF 


4602 “ENDM  -TYPOCT 


MACRO 


CZMSD00 Trace OIAGNOSTIC 


I< 
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.SBTTL MACRO TYPOCS 


“iene so 5 eon TYPOCS @¢6¢060666066666660666¢6 


;TYPOCS IS USED TO CHANGE A BINARY NUMBER TO AN OCTAL 
NUMBER AND TYPE 1 TO 6 DIGITS 


; WITH OR WITHOUT LEADING ZEROS. 

; ARGUMENTS : 

i1) NUM NUMBER TO BE TYPED 

12) REMARK ALLOWS A COMMENT TO BE MADE 

:3) N NUMBER OF DIGITS (1 TO 6) TO BE TYPED 
;4) z BLANK=SUPPRESS LEADING ZEROS (TYPES SPACES) 
: NON-BLANK=TYPE LEADING ZEROS 
;ROUTINES REQUIRED 

71) CONVERT BINARY TO OCTAL AND TYPE (.$TYPOCT) 
$2) TYPE AN ASCIZ STRING (. $TYPE) 

;EXAMPLES 

2 eee eos, 


:3) TYPOCS @004,<TYPES ” 4">,2 


. 
§ FSSSSSSSSESSSHSSESSSSESESSEESESSEESEEEESASAEEESOSEEASEEESEEEEEEEEEEEESSESE 


.MACRO TYPOCS NUM,REMARK,N,Z 


-NLIST 

-OSABL CRF 

-IIF OF LSTS$ .LIST ME 

-ENABL CRF 

-LIST 

MOV NUM, -C SP) ;:;SAVE NUM FOR TYPEOQUT 

-IIF NB <REMARK>, 3; s REMARK 
TYPOS 3:;GO TYPE--OCTAL ASCII 

.IF NBN 

5 ty N ss TYPE N DIGITC(S) 

.BYTE 6 33TYPE 6 DIGITS 

.IF NB Z 

‘ i 3; TYPE LEADING ZEROS 

.BYTE ) 3;SUPPRESS LEADING ZEROS 

.ENOC 

.DSABL CRF 

‘ea OF LSTS$ .MLIST ME ie 


-ENABL CRF 
. ENDM TYPOCS 


o£ GUENCE 


/M DIAGNOSTIC 


I { 
i , 
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.SBTTL MACRO TYPDEC 


AIRS Sep pite TYPDEC COSOSODOOEOOEEEESOSS 


:TYPOEC Is A TO CHANGE A BINARY NUMBER TO A SIGNED 
DECIMAL NUMBER AND TYPE IT REPLACING LEADING ZERO 


' WITH SPACES. 

:NOTE: IF THE NUMBER IS NEGATIVE A 

: MINUS SIGN WILL BE TYPED. 

3 

; ARGUMENTS: 

3 

31) NUM NUMBER TO BE TYPED 

’ 

32) REMARK ALLOWS A COMMENT TO BE MADE 

; 

;ROUTINES REQUIRED 

; 

71) CONVERT BINARY TO DECIMAL ANO TYPE (.$TYPDEC) 
: 

32) TYPE AN ASCIZ STRING (.$TYPE) 

3 

; EXAMPLES 

8 

1) TYPDEC SIZE,<TYPE — CONTENTS lal SIZE» 
:2) TYPDEC @-10.,<TYPE A MINUS TEN 


a 
§S SSSSSEASSHESEHESSESSSSAEESESESESESEESEOSESESEEESEEESEEEEEEEEEEEEESEEELES 


ret TYPDEC NUM,REMARK 


-OSABL CRF 
.IIF DOF LST$$ .LIST ME 
ENABL CRF 


“LIST 
MOV NUM, -( SP) ::;SAVE NUM FOR TYPEQOUT 

.IIF NB <REMARK >, ; ;sREMARK 
yen 3:GO TYPE--DECIMAL ASCII WITH SIGN 


SABL CRF 
“IIF OF LST$$ .NLIST ME 
-ENABL CRF 
. ENDM TYPDEC 


CZMSDDO MS11 ./M DIAGNOSTIC 
MACRO BMOV 


MACRO M1113 14-JAN-82 16:15 PAGE 


MY 


126 


.SBTTL MACRO BMOV 


50060666664 4664C6e BMOV Sete eseeeseseeeeeeseseseeeees 


> 
; THIS MACRO MOVES A BLOCK OF DATA, 


SEQUENCE 114 


THE FIRST ADORESS OF THE SOURCE BLOCK. 
THE FIRST ADORESS OF THE DESTINATION BLOCK. 


IF BLANK THE 1ST ADDRESS OF THE USER INSTRUCTION 


PAR'S 


| ARGUEMENTS : 
:1) FROMHE RE 
12) TOHERE 
3 
:3) SIZE 


a 
é 
; 
; 
; 
; 
° 
3 


IF BLANK A 
“WHY DEFAULT TO 16 WORDS?” YOU ASK! 


IS USED (FASTCITY). 
THE SIZE ¥ THE SOURCE BL 


BLOCK. 
16 WORD TRANSFER IS ASSUMED. 


THAT'S HOW MANY WORDS TO THE USER PAR 


“BECAUSE 
REGISTERS € THAT'S WHERE I INTEND TO MOVE LOTS 
OF STUFF.” : 


I REPLY 


SHSESSSESESSSEESHSSEOESESESEEEEESEEEEESESEEEASEEEEEEHEEE 


MACRO BMOV #FROMHERE, TOHERE SIZE 
_IF B TOHERE 
.NLIST 
DSABL CRF 
"TIF OF LST$$ .LIST ME 
 ENABL CRF 
Ssh RS BLOCK1 
FROMHERE 
.OSABL CRF 
"IIF OF LST$$ .NLIST ME 
 ENABL CRF 
“MEXIT 
-ENDC 
“IF 8 SIZE 
-NLIST 
“DSABL CRF 
"IIF OF LST$$ .LIST ME 
 ENABL CRF 
“LIST 
JSR R5,BLOCK2 
TOHERE 
.DSABL CRF 
"IIF OF LST$$ .NLIST ME 
ENABL CRF 
IFF 
.NLIST 
DSABL CRF 
TF OF LST$$ .LIST ME 
- ENABL CRF 
JSR RS,BLOCK3 


SIZE 


CZMSDDO MS11-L/M DIAGNOSTIC 
MACRO BMOv 


MACRO M1113 


NY 
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SEQUENCE 


-* 


-- 


7 


_ re ee + mee ee ne eee ee er ee ee oe meme 


L-™ OTLE&aGNOSTIC 


MACRO M1115 


Bid 
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.SBTTL MACRO MAP 


§ PSCC EEESEOEEES MAP ESSEC EEESESEOESESOSESESOS 


; 
; THIS MACRO MAPS A MEMORY BANK (16") INTO Tre 


; TEST PATTERN AREA (SUPERVISOR VIRTUAL (60000 157777),. 


| ARGUEMENTS : 

ph) BANK THE BANK OF 16K WORDS 10 BE MAPYED. 
; THERE ARE 120 BANKS OF 16K WORDS 
VEXAMPLES 

: MAP LOC 

: MAP 028. 

: 

: 


















MAP BANC 
Rs 
CRF 
. LSTSS ..IST ME 
° CRF 
-LIS 
.IF 8 BANK 
MOV #120. .R3 
. FF 
“OV BA RS 
. ENDC 
CALL MAPPER 
-OSAGL. CRF 
-IIF OF LSTSS .MIST ME 
. ENABL CRF 
POP RS 
-ENDM = MAP 


Bee a ae 


sL.OCATION “LOC” CONTAINS THE @ OF THE BAte TO “AP 
;BANK 34 (OCTAL) WILt BE MAPPED 


BAcRS? Side ays Sok MONO?’ TS 


C10 
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.SBTTL MACRO SUPERVISOR 


peseeecoscooosoesees SIPERVISOR eoccseesesesesesseses 
; 

; THIS MACRO SWITCHES TO SUPERVISOR MODE. 

i 

; ARGUEMENTS: NONE. 


; 
FSSSSSSSSSSSSSSSSSESESSEESESSESHEEOSEOESEESECESCHAEEOHESEE 


I 

.IIF OF LSTS$ .MLIST ME 
-ENABL CRF 

-ENDM SUPERVISOR 
-SBTTL MACRO USER 


peeeeseesseceseses USER socccesescesesecesesesessess 
‘ 

; THIS MACRO SWITCHES TO USER MODE. 

; 

;ARGUEMENTS: NONE. 


3 
§ FSSSSSSSSSHSSESSSSSHSSSESSESSEEESEEHESCEEESEESEEOEEEOE 


IIF OF LSTSS .MLIST ME 


TO SUPERVISOR MODE 


:GO0 TO USER MODE 


SE GUE NCE 


D0 


SEG ANCE 
ms /M@ DIAGNOSTIC MACRO MI1LIi® 14 JAN-82 16:15 PAGE 1531 Sy 
SACRO Tettaken °° 
.SBTTL MACRO TESTAREA 
po peeesccoseseosocoss TESTAREA ceesecseseseeseseeeesseess 
2854 i THIS MACRO SWITCHES TO THE SPECIFIED TEST MODE. 
4855 ; 
4856 ; ARGUEMENTS: NONE. 
ase  ieiiiadnlih np emaeidbin pepenandbbnnesedeeseses 
4859 
-MACRO TESTAREA 
3861 ‘MLIST 
4862 -_OSABL CRF . 
-IIF OF LSTS$ .LISY ME 
ases ENABL CRF 
Prae srs. TESTMODE .PSW ;GO TO SYSTEM TEST MODE 
st ae 
4865 .IIF OF LSTSSs . 
454.4 


-ENABL CRF 
4870 .ENDM TESTAREA 


E10 
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.SBTTL MACRO SETS € RES4 


jeeeeceseccsosoooose SETS € RESS soecesesesoesesesess 
+ 
; THESE MACROS SET € RESTORE VECTOR 4( TIMEOUT TRAP) 
i 
; IN IT'S RESTORED MODE TRAPS ARE REPORTED AS SUCH. 


i 
on LOC 3 THE LOCATION TO VECTOR TO (ONLY USED IN “SE'T4” NOT “RES4”) 


i USE THE SET4 AND RES4 MACRO ore k CODE THAT I EXPECT TO TRAP TO 4 
sLIKE LOOKING FOR ALL POSSIBLE CSR'S AND ETC. WHENEVER CODE IS NOT 
D BY SET4 AND RES4 THEN ANY TRAPS TO 4 WILL CAUSE AN E 


SEQUENCE 


; SURROUNDE RROR 
: PRINTOUT THAT SAYS “UNEXPECTED TRAP TO 4” AND ALL THE ASSOCIATED REGISTER JUNK 


§ SSSSSSSHESESSSSESSESEHESEESSSSEESESESSEEOSEEEESEEEESEEEEEE 


-MACRO SET4 ARG 

-NMLIST 

.OSABL CRF 

.IIF OF LSTS$ .LIST ME 

-ENABL CRF 

.LIST 

MOV ARG .4 

.OSABL CRF 

-IIF OF LSTSS$ .NLIS’ ME 

. ENABL CRF 

.ENDM SET4 

-MACRO RES4 

-NMLIST 

,OSABL CRF 

-IIF OF LSTS* .LIST ME 

-ENABL CRF 

.LIST 

MOV @TIMEQUT 4 

CMP 41, PROT YP 31S THIS AN 11744? 

BNE 1018 ;BRANCH IF NOT 
— cia CPUERR ;CLEAR OUT THE CPU ERROR REGISTER BITS 
1 : 

pa ; THAT A EXPECTED TRAP COULD HAVE SET 


T$8 .NLIST ME 


cS 
at 


* 
ae 


FAQ 


CZMSD00 S11 ./™ DIAGNOSTIC MACRO M1115 i4 JAN-82 16:15 PAGE 135 SEGANCE i22 
MACRO OLEF T 

4918 .SBTTL MACRO ODLEFT 

4919 peeeesscsooososese DLEFT eeesssesseeseseseeseseseesesees 

4920 ; : 

poss ; THIS MACRO DOES A DOUBLE WORD LEFT SHIFT 

‘ 

ps o ; ARGUEMENTS: LOC sTHE LOCATION TO BE SHIFTED LEFT (CARRY TO LOCe2) 

4925 5 00000000000000000000000000000000000000000000000008 

4926 

4927 -MACRO OLEFT ARG 

43928 -NLIST 

4929 -DOSABL CRF 

4930 .IIF OF LSTSS$ .L IST ME 

4931 -ENABL CRF 

4932 .LIST 

493" ROL ARG 

4934 ROL ARG+2 

4935 _OSABL CRF 

49% .IIF OF LSTS$ .NMLIST ME 

4937 -ENABL CRF 

4938 .ENOM 8 DOLEFT 


4939 -NLIST ™D ;D0N'T NEED TO SEE THEM ANY MORE 


MS11-. 


CZ™SDD0 
TRAP CATCHER 


000177 


/M DIAGNOSTIC 


(510 
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.SBTTL TRAP CATCHER 
.*0 
. WORD 0,0 
.REPT 177 ;.WORD .+2,HALT 
.SBTTL ACTI1L HOOKS 
;*THE HOOKS REQUIRED BY ACT11 ARE DEFINED AND SETUP BELOW: 
;¢ DEFINITIONS: 
:¢ 1)L0C .46 “END -OF -PASS” 
:¢ “ADDRESS OF END OF PASS ROUTINE 
:¢ MODIFIED BY ACTI1. 
i¢ 2>.0C.52 AM NEEDS HOOK 
;¢ BIT 15*1 PROGRAM SHOULD BE POWER 
;¢ FAILED WHILE RUNNING 
;¢ =O NO POWER FAIL 
;* BIT 14*1 PROGRAM MEMORY SIZE A eal 
;¢ =O NOT MEMORY SIZE DEPENDENT 
;¢ BIT 13*1 PROGRAM REQUIRES MANUAL INTERVENTION 
3° “0 MANUAL INTERVENTION NOT REQUIRED 
;¢ a BITS 12-0 MUST BE ZERO'S 
oe +:1)SET LOC.46 TO ADORESS OF SENDAD IN .sEOP 
WORD BIT4 :;32)SET LOC.5S2 TO INDICATE MEMORY SIZE DEPENDANT 
.SBTTL APTL1 HOOKS 
.*24 3;SET POWER FAIL TO POINT TO START OF PROGRAM 
‘. :3FOR APT START UP 
STACK 350 RT11 CAN hg —" RUN COMMAND 
. 244 s:;POINT TO APT INDIRECT ADDRESS PN 
SAPTHDOR ;;POIN! TO APT HEADER BLOCK 
STARTS: BR START1 ; “NORMAL” START 
START2 ;sRESTART (SAVE ERROR ACCOUNTING) 
STARTi: CLR RESTART 
TART 
START2: SET RESTART 
START 


CZMSDD0O MS11 ./™ DIAGNOSTIC 


VARIABLES 


| | ( } 
risa VY 
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INITIALIZED TO ZERO 


eee 





.SBTTL VARIABLES INITIALIZED TO ZERO 
;*THIS TABLE yb VARTOUS COMMON STORAGE LOCATIONS 
;*USED IN THE PROGRAM 
SCMTAG: ia START OF COMMON TAGS 
SELONLY:0O sSELECT ONLY BANKS MARKED BY FIELD SERVICE MODE FLAG 
DIAGFLAG:0 sSET FOR SHIFTING DIAGONAL TEST 
KAMIKAZE :0 ;SET FOR KAMIKAZE MODE TESTING 
SK IPKAMI:0O ;USED TO SKIP RESTORING KAMIKAZE MODE WHEN MODIFIED 
;NEXT TWO BYTES ARE DISPLAYED IN THE DISPLAY REGISTER 
SPATMAR: .BYTE 0 ;sPATTERN NUMBER 
$BANK: .BYTE 0 ;BANK € SIGN 
SERFLG: .BYTE 0O 3 ;CONTAINS ERROR FLAG 
SITEMB: .BYTE 0 s;CONTAINS ITEM CONTROL BYTE 
LASTERROR: .WORD O sNUMBER OF ERRORS ON LAST PASS 
ERRPC: .WORD 0O :;CONTAINS PC OF ERROR FOR TYPEOUT 
BADPC: .WORD 0 sCONTAINS PC OF ERROR 
ERRSP: .WORD 0 sCONTAINS SP OF ERROR FOR TYPEOUT 
BADSP: .WORD 0 sCONTAINS SP OF ERROR 
ERRPSW: .WwORD oO sCONTAINS PSW OF ERROR FOR TYPEOUT 
BADPSW: .WORD 0 sCONTAINS PSW OF ERROR 
ADDRESS: .WORD 0 s ;CONTAINS ADDRESS OF ‘B8AD‘ DATA 
PADORESS: .WORD 0 S OF PARITY ERROR 
PHYADD: .WORD 0,0 s22 BIT PHYSICAL ADORESS 
GOOD : -WORDB O | INS ‘GOOD’ DATA 
GOOD2: .WORD oO ;;CONTAINS ‘GOOD2’ DATA 
GOODS: .WORD oO 33 TAINS ‘GOODS’ DATA 
BAD: WORD Oo ssCONTAINS ‘BAD’ DATA 
BADe: WORD O s:CONTAINS ‘BAD2’' DATA 
BADS: -WORDB O ssCONTAINS ‘BAD3’' DATA 
BAD : .WORD O ;xOR OF GOOD € BAD = BAD BITS 
S$AUTO: .WORD 0 s sAUTOMATIC MODE INDICATOR FoR APT.ACT,. & XxDP 
FATAL$: .WORD 0O sFATAL ERROR INDICATOR 
SKPERR: .WORD 0 sUSED TO SKIP ERROR MESSAGE IN “SERRGEN” 
NEMCNT: O SNON-EXISTANT MEMORY COUNTER (HOLES) 
PARCNT: © sPARITY ERROR COUNTER 
PATERR: O sPATTERN ERROR COUNTE ER 
NOPAR: O sNO PARITY ERROR MODE INDICATOR 
NONEM: Oo 340 NON-EXISTANT ged CHOLES) MODE INDICATOR 
BANK : '¢] ; MEMORY TEST 
BANK INDEX: 0 ;USED TO INDEX INTO CONFIG TABLE 
CPuBIT: 0 sCONTAINS 1 BIT TO = * CPU TO CONFIGURATION TABLE 
: 0 sMEMORY UNDER TEST FLAG 
PATTERN:O sPATTERN NUMBER UNDER TEST 
KPFLAG: . ;BANK IS PROTECTED REGION OF ECC 
ACFLAG: . ;BANK CAN BE ACCESSED BY THIS CPU 
MKFLAG: VIF SET INDICATES MS11-M OR MF11S-K UNDER TEST 
PFLAG: . ;BANK IS IN PROGRAM SPACE 


SP 
;BANK IS WHERE PROGRAM RELOCATION IS REQUIRED TO TEST 
sPROGRAM IS RELOCATED FLAG 
;"BANK IS IDENTIFIED AS BAD MEMORY” FLAG 
;“BANK HAS EUB MEMORY” FLAG 
;“TYPE OF MEMORY TO TEST” FLAG; O = PARITY, 1 = ECC 
; "BANK IS INTERLEAVED” FLAG 
:"BANK IS 64K INTERLEAVED” FLAG 
; "ABORT OCCURED” FLAG 
sHOLOS OLD KERNAL STACK POINTER IN CASE OF CNTL/K 
;DATA TO OR FROM CSR 


2 
7" 
r 
& 
COd0000CCOCO00N 


28 
az 
_- &. 
335 
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VARTABLES INITIAL IZED TO ZERO 














5051 002146 9000000 CSRNO: O :;CSR ADDRESS NUMBER (4 LSB’ we 
5052 002150 000000 SevCer: .wWord : osen oe” to Seve CerNo du A FS Commena © ;0 
5053 002152 000000 OLOCSR: .WORD D0 CSR NUMBER( USED IN tie R TEST) 
5054 ; THESE LOCATIONS STORE cas DURING SUPERVISOR TESTS 
5055 002154 000000 SUPDRO: O 
5056 002156 000000 SUPORI: O 
5057 002160 000000 SUPDR2: O 
5058 002162 000000 SUPORS: O 
5059 002164 000000 SUPDR4: O 
5060 002166 ©O00000 SUPDRS: 0 
5061 002170 000000 SUPORGE : : 
5062 002172 000000 DUMMY : ;DOUMMY LOCATION FOR ADDRESS PASSING 
5063 ; THESE LOCATIONS STORE GPR'S €& poi DURING DETAILED ERROR PRINTOUTS 

002174 900000 DE TRO: 
$065 002176 000000 DETRI1: ° 

3 002200 000000 DETR2: O 

5067 002202 000000 DETRS: O 
5068 002204 000000 DETR4: Oo 
5069 002206 000000 DETRS: oO 
5070 9002210 000000 DETSP: oO 
5071 002212 000000 DETPSW: O 
5072 002214 000000 DETFLAG:0O ;DETAILED REPORT FLAG 
5073 002216 000000 CONTFLAG:0O ;CSR‘S HAVE BEEN TESTED FLAG 
5074 000000 TOTCSRS: .WORD O 31 BIT PER EXISTING CSR, EG- 
5075 :CSR O REPRESENTED BY BIT a>, €rc. 
5076 002222 000000 CSRFIRST: .WORD 0O IFIRST ADDRESS UNDER CONTROL OF THIS CSR 
5077 002224 000000 T: .WORD O 
5078 002226 000000 :.WORD O 
5079 002230 000000 :.WORD O 

002232 000000 -.WORD O 
5081 002234 000000 -WORD O 
5062 002236 000000 000000 0.0 
S083 002242 000000 900000 0.0 
5084 002246 000000 000000 0,0 
5085 002252 000000 000000 0,0 

002256 000000 0 
5087 002260 000 0 

002261 000 -BYTE 0 
5089 002262 000000 WORD O 
5090 002264 000000 :.WORD O 
5091 000000 :.WORD O 
5092 002270 000000 -WORD O 
5093 002272 000000 .WORDB O BANK 
5094 002274 000000 -WORD O sSOURCE OF DATA WORDS FOR ae ol GENERATION SUBROUTINE 
5095 002276 000000 -WORD 90 ‘CHECKBITS TO BE LOADED INTO CSR 

002 000000 -.WORDB Oo ;VALUE TO BUMP THE PC BY TO RECOVER AFTER A PARITY TRAP 
5097 002302 000000 -WORD O ;VALUE TO INCREMENT ADDRESS BY TO REMAIN IN THE SAME CSR 
5096 002304 000000 WORD O :L00P CONTROL FOR CSR TESTING 

002 000000 -WORDB O SFLAG SET BY SUCCESSFULL TASK OR SUBROUTINE 
5106 002310 000000 .WORD O sFOR AID IN “MOV” INSTRUCTIONS 
5101 002312 000000 -WORDB O sSECONDS THAT BATTERIES SHOULD LAST 
5102 007314 000000 . WORD 0 sFLAG TO SKIP MKCONTROL SUBROUTINE 
5105 002316 000000 NULLFLAG:.WORD 0 :SET WHEN RUNNING NULL PATTERNS 
51 002 000000 QVFLAG: O sFLAGS QUICK VERIFY PASS UNDER APT, ACT, OR XXDP CHAIN MODE 
5105 002322 000000 ACTFLAG:0O sFLAGS ACT AUTOMATIC MODE PROGRAMMING RULES 
5106 062324 000000 APTFLAG:O sFLAGS APT AUTOMATIC MODE PROGRAMMING RULES 
5107 002326 000000 XXDPCHAIN: 0 sFLAGS XXOP CHAIN MODE PROGRAMMING RULES 


J1LO 
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VARTABLES INITIALIZED TO ZERO 
5108 sNOTE: THESE TWO BYTES MUST STAY TOGETHER 
5109 002350 000 SNWUAL: .BYTE 0 ssCONTAINS NULL CHARACTER FOR FILLS 
5110 002531 G00 SFILLS: .BYTE O sCONTAINS © OF FILL CHARACTERS 
ret 002332 000 sTPFLG: y oi 0 1s"TERMINAL NOT AVAILABLE” FLAG 
-EV 
51135 002334 000000 sESCAPE :0 Fe yes ON ERROR ADORESS 
5114 0023536 000000 EVEN: 0 sUSED FOR ALTERNATE DATA PATTERNS 
5115 002340 000000 STRIPES:0O ; COUNTS DIAGONAL STRIPES 
3116 002342 000000 COUNT: 0O ;BACKED UP COPY OF STRIPES 
5117 002344 000000 NOTAB: 0 ’ TABLE BEING PRINTED - NOW 
5118 002346 000000 BSIZE: 0O sSIZE OF 11/45 MOS MEMORY IN K WORDS 
5119 002350 000000 KSIZE: 0 sSIZE OF MF13S-K MEMORY IN K WORDS 
5120 0023552 000000 LSIZE: 0O sSIZE OF MS11-L MEMORY IN K WORDS 
5121 002354 000000 I 0 sSIZE OF MS11-M MEMORY IN K WORDS 
Si22 0023556 000000 PSIZE: 0 sSIZE OF UNIBUS PARITY MEMORY IN K WORDS 
5123 002 000000 TOOMANY : 0 sFLAGS WHEN TOO MANY ERRORS HAVE BEEN PRINTED FOR A BAI 
5124 002362 000000 READONLY : 0 sFLAG TO PATTERNS TO READ ONLY 
5125 002 000000 000000 TESTADO:0,0 1 THE ADDRESS TO RUN CSR TESTS ON 
126 002370 000000 UNITOP: 0 ;HIGHEST ACCESSABLE BANK OF MEMORY THRU UNIBUS MAP 

5127 0023572 900000 STOPOK: 0 sFLAG TO we STOPPING WITH SWITCH REGISTER 
5126 002374 000000 APTPAR: .WORD 0 sAMOUNT OF PARITY MEMORY ACCORDING TO APT 
5129 002376 0600000 APTECC: .WORD 0 sAMOUNT OF ECC MEMORY ACCORDING TO APT 
5130 002400 000000 NOF SMODE : 0 iFLAG TO OISABLE FIELD a tt MODE 
5131 002402 000000 NOERROR ; ;"THIS IS NOT AN ERROR” FLAG 
S132 002404 000000 LOADBANK : 0 : BANK LOADERS ARE RELOCATED TO 
5133 002406 000000 TEP: OO sUSED FOR JUNK 
3134 002410 000000 QUICK: 0 s QUICK STOP FLAG FOR APT POWER FAIL 
5135 002412 000000 NOSCOPE : 0 1"NO SCOPE LOOP ALLOWED” FLAG 
5136 002414 000000 FSINFLAG:0O :“FIELD SERVICE - NO INTERNAL INTERLEAVE” FLAG 
5137 002416 000000 APTSIZE:0 sAPT SIZING INFO FLAG 
5138 002420 000000 FS7FLAG:0 ;TRUE WHEN IN FIELO SERVICE COMMAND 7 
5143 002422 000000 : s CONFIGURATION ERROR FLAG 
3144 002424 000000 I: sUSED F°*i GENERAL PURPOSE INDEXING 
5145 002426 000000 NO2Z2BIT:0 3NO 22-BIif MODE FLAG 
5146 002430 000000 : sNO SUPERVISOR MODE FLAG 
3147 002432 000000 ERRADO: .WORD 0 sHOLDS THE CSR’S ERROR ADDRESS 
5148 002434 000000 000000 000000 CSRINFO:0,0,0,0,0,0,0,0 sUSEO TO STORE INFORMATION ABOUT THE 16 

002442 900000 000000 000000 

002450 000000 000000 
5149 002454 000000 000000 000000 0,.0,0,0,0,0,0,0 sPOSSIBLE CSR'S 

000000 000000 000000 

002470 000000 000000 
3150 002474 000000 LINKI: Oo sUSED TO HOLD LINKS TO PATTERNS WHICH 
5151 002476 000000 LINK2: 0 sCAN EXECUTE IN THE PAR/PDR‘S OR NOT 
5152 002500 000000 CSRHOLD : 0 sUSED TO STORE CSR VALUES FOR CSR TESTS 
3153 002502 000000 KFLAG: 0O sUSED TU FLAG MF11S-K MEMORY TO TESTS 
5154 002504 000000 000000 PGMCSR: .WORD 0,0 sPOINTS TO PROGRAM CSR 
5155 002510 000000 INMECC: .WORD OO sFLAGS INHIBIT ECC TESTS ON RELOCATION 
5156 002512 000000 INHB : «WORD 0 ; 
3157 002514 000000 FILLREL:.WORD 0 


5195 002516 SCMTGE: ; END OF COMMON TAGS 


ILO 
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VARIABLES INITIALIZED TO NON ZER 
5198 .SBTTL VARIABLES INITIALIZED TO NON ZERO 
5199 002516 000001 000000 CACHKN: 1,0 sCACHE CONSTANT “MOVED TO CONTRi TO TURN ON CACHE) 
5200 002522 001415 CACHKF: 1415 sCACHE CONSTANT (MOVED TO CONTRL TO TURN OFF CACHE) 
5201 002524 040000 TESTMODE : 40000 ;USED TO SELECT THE PROPER TEST MODE FOR A PATTERN RUN 
5202 002526 000012 ERRMAX: 10. sMAX @ OF ERRORS PER BANK WITH Swill 
5203 002530 000167 LASTBANK : 167 ;HIGHEST BANK OF MEMORY 
$204 002532 170000 LASTBLOCK : 170000 sHIGHEST BANK OF MEMORY’ +1 CIN PAR FORMAT) 
5205 002534 000031 SOBK : 25. ;SO08 CONSTANT 
5206 002536 002000 KSTACK: STACK ;STACK BEGINNING 
$207 002540 000001 LOADHOME : 1 ‘HOME BANK OF LOADERS 
5208 002542 177777 WORST: 177777 ;SET IF TESTING wn IN WORST FIRST MODEC IST PASS) 
5209 002544 176543 SEEDHI: 176543 sWORKING SEED HI (.'SED FOR RANDOM NUMBER GENERATOR) 
5210 002546 123456 SEEDLO: 123456 ;WORKING SEED LO (¢ USED FOR RANDOM NUMBER GENERATOR) 
S211 002550 176543 MSEEDH: 176543 sMASTER SEED HI (USED FOR RANDOM NUMBER GENERATOR) 
S2i2 002552 +23456 MSEEDL: 123456 sMASTER SEED LO (USED FOR RANDOM NUMBER GENERATOR) 
$213 002554 177777 HEADER: 177777 sUSED TO PRINT HEADINGS ONLY ONCE 
$214 002556 177777 ONES 177777 sFOR AID IN “MOV” INS 
5215 902560 000003 FLIPLOC:3 ;COUNTER FOR FLIPING DATA ON WORST coat —— TEST 
5216 002562 052525 SOF TPAT :52525 sPATTERN FOR SOFT 
5217 002564 000000 SLPADR: .WORD 0 1 :sCONTAINS SCOPE LOOP ADDRES 
5218 002566 000000 $LPERR: .WORD 0 $3 AINS SCOPE RETURN FOR ERRORS 
5219 002570 000000 RESTART:0O sRESTART (START ADD 202) FLAG 
a 002572 000000 SERTTL: .WORD 0 : ;CONTAINS TOTAL ERRORS 
$225 peeessessosessesesoesesoss NOTE THESE TWO git MUST STAY TOGETHER seesessesecs 
5226 002574 000377 BAKPAT: .WORD 377 sBACKGROUND PATTERN . 
S227 002576 177400 SWAPAT: .WORD 177400 sSWAPPED BAKPAT & 
— § SSESSESNESESESESEHSSEEEAEHSSEEEEEOEESEOEEESOEESEEEEEEOSEESEEEEEEEEEEEEEESEOEEEEEEESSE 
5230 002600 177570 SuR : . WORD DSWR + sADDRESS OF SWITCH REGISTER 
5231 002602 177570 DISPLAY: .WORD ODDISP ssADDRESS OF DISPLAY REGISTER 
5232 002604 177560 $TKS: 177560 si TTY KBO STATUS 
5233 002606 177562 sTKB: 177562 s:TTY KBD BUFFER 
5234 002610 177564 sTPS: 177564 s3:TTY PRINTER STATUS REG. ADDRESS 
5235 002612 177566 sTPB: 177566 33 TTY PRINTER BUFFER REG. ADDRESS 
5236 002614 012 SFILLC: .BYTE 12 3; INSERT FILL CHARS. AFTER A “LINE FEED” 
5237 002615 yo 377 377 $BELL: .ASCIZ <207><377><377> ;;CODE FOR BELL 
5238 002621 077 SQUES: .ASCII /?/ ; sSQUESTION MARK 
5239 002622 015 sCRLF: .ASCII <1i5> ; ;CARRIAGE RETURN 
5240 002623 012 000 $LF: -ASCIZ <12> ;;LINE FEED 


L1O 


CZMSODO MS11 ./™ DIAGNOSTIC MACRO M1113 14 JAN-82 16:15 PAGE 143 5E QUENCE 
CONFIGURATION TABLE 

5244 .SBTTL CONFIGURATION TABLE 

5245 ;CONFIG:FIRST 16K CONFIGURATION WORDS (2 EACH) 

sas ; 2N0 16K CONFIGURATION WORDS (2 EACH) 

ee eT Tee eT eee TT ee Te ee 

ye . 200TH 16K CONFIGURATION WORDS (2 EACH) 

5250 ; CONFIGURATION WORDS : 

S251 : LOW: BIT O ERRORS PRESENT 

SeSe2 ; BIT 1 MEMORY SUCESSFULLY ACCESSED 

$255 : BIT 2-4 RESERVED 

5254 ; BIT 5 SKIP ECC LOGIC TESTS FLAG (1«SKIP) 

SeS5 ; BIT 6 PROTECTED REGION OF ECC MEMORY 

S256 ; BIT 7 PROTECTED (PROGRAM SPACE ) 

S257 : BIT 8-11 CSR CODE 

5258 ; BIT 12-15 INTERLEAVED CSR CODE 

5259 F HIGH: BIT 0-7 NUMBER OF ERRORS 

5260 : BIT 8-10 MEMORY TYPE 

5261 : BIT 11 INTERLEAVED BOARD TYPE (0-128K, 1=64K) 

5262 i BIT le INTERLEAVE ENABLED 

5263 : BIT 15 “BACKGROUND PATTERN VALID” FLAG 

5264 BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 

5265 BIT 15 LOADERS HOME BANK 


002626 000201 CONFIG: -REPT 201 
5269 003632 CONF TEND : 


CZMSODO MS11 ./M DIAGNOSTIC 


SSS EEECSEESESECESE MAIN 0464646666 66660666666660606666 


S271 
S272 


0036532 


105737 
001001 


000005 
013706 
012700 


005020 
022700 


001374 
012737 


012737 
005000 


063116 


002556 
002000 
002516 


000167 


000001 


160000 
002074 
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002530 


002074 
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SBTTL #606 066666666666060080 MAIN se eseeesesesesseesessseseeees 


START: SUBTST <<INITIALIZE VARIABLES TO ZERO>> 


§ PSSSOSSEESEEESESESEEEASESEEOEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEHEEEEEEEEEEEEEEEEEEEES 


; SUBTEST INITIALIZE VARIABLES TO ZERO 
j POCA OEESEEEEEEEESESESEEESEEEEE EEE EEEEEEEEEEDEEEOEEEOEEEEEEEEEEEDERODEEEEEEESS 
TSTB sENV 
BNE NORE S 
RESET 
NORES: MOV KSTACK, SP +;SETUP THE STACK POINTER 
MOV @sCMTAG,RO +sFIRST LOCATION TO BE CLEARED 
1$: CLR CRO)-> ;sCLEAR MEMORY LOCATION 
CMP @sCMTGE ,RO 3 sDONE ? 
BNE i$ sLOOP BACK IF NO 
MOV @167,LASTBANK ;RESTORE LASTBANK (THIS MUST BE DONE PRIOR TO SYSTEM SIZING) 
SUBTST <<CLEAR NON-PROGRAM SPACE >> 


| COORAEEHSEEEERESEEEEREEEEESEDEEEEOSEEEDEEEEEEEEEOHEEEEEEEEEEEEEEEESEEEEEEEEEEES 
; ¢SUBTEST CLEAR NON-PROGRAM SPACE 
j COROSESEESOOESEESERESEEEEESEOESEEEREEEEEEEEEEEESEESEESEEEDEEESEEEEEEEESEEEE SEES 
;THIS ATTEMPS TO GET RID OF ANY PARITY ERRORS BY WRITING INTO 
sEVERY LOCATION THAT IS NOT LOADED INTO BY THE PROGRAM OR ALLOCATED 


;TO THE XXDP LOADERS 
MOV @1,NOPAR ;sPARITY ACTION = COUNT &€ IGNORE 
CLR RO 
23: CLC 
ADC CRO)> 
CMP RG, #160000 
BLO 2s 
CLR NOP AR ;RESTORE DEFAULT PARITY ACTION 


CZMSODO MS11-L/M DIAGNOSTIC 


CLEAR NON-PROGRAM SPACE 


5310 003716 


5311 


003716 
003720 


000405 
005037 


0052 
012737 


005037 
005737 
012737 


003720 
000003 


0024350 
140000 


056560 
177766 
177777 
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002522 


064412 


172516 
172516 


002524 


002530 


003720 


SUBTST 


NiO 
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<<TYPE OF SYSTEM SIZER>> 


SEQUENCE 130 


§ SSSSSSSSSSHESSESEESESAESEEESESEEESESEEEEEEESEEEEEEEEEHESEEEEEEEEEEEEEEESREEEEEEEEEEEEEE 


;¢SUBTEST 


F FSSSHSSSSASSEHESESESESESSEASESEOESSEESEEEEEEEOSEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEBEEEED 


PROTYP: 
SYSSIZ: 


9%: 
4$: 
5$: 


6%: 


78: 


10$: 


TYPE OF SYSTEM SIZER 


BR SYSSIZ 
SET4 04% 

TST CONTRL 
SET4 o9$ 

TST MAINT 

BR 5$ 

MOV 614, CACHKF 
BR 5% 

CLR CACHKN 

MOV @ZEROS ,DT14 
SET4 06 $ 

TST MMRS 

CLR MMRS 

BIS OBITS MARS 
BIT OBIT4 MARS 
BNE Os 

‘BR 7$% 

;* 11/734 TYPE MACHINES ENTER HERE 
MOV #140000, TES TMODE 
INC I 
CLR 0T5+10 
CLR 0T14+10 

;# 11/45 TYPE MACHINES ENTER HERE 
INC NO22BIT 
MOV 67 ,LASTBANK 
CLR OTS+12 
CLR 0T14+12 
BR 83 
SET4 68% 

MF PT 

MOVB RO ,.PROTYP 
CMP #3 .PROTYP 
BNE 6s 

INC NOSUPER 
MOV #140000 , TES TMODE 
SET4 011% 

CLR CPERRF 

TST 80177766 
MOV @-1,CPERRF 
RES4 


;SKIP OVER VARIABLE LOCATION 


;SEE IF CACHE REGISTER RESPONDS 
sYES - DO WE HAVE 11/44 TYPE CACHE 
sOR 11/60 TYPE CACHE? 

;BRANCH IF 11/44 TYPE CACHE 

;TURN OFF CONSTANT FOR 11/60 CACHE 


sNO CACHE ON SYSTEM 
300 NOT PRINT CONTRL ERROR MESSAGES 


;00 WE HAVE AN MMR3? 
;YES WE DO 
;SEE IF THERE IS 22-6IT MODE 


sBRANCH IF 22-BIT RELOCATION 
;BRANCH IF MMRS BUT NO 22-BIT RELOC. 


;MAKE TEST MODE USER , 
sNO SUPERVISOR MODE 


sNO 22 BIT MODE 

3124K MEMORY MAX. MEMORY SIZE 

300 NOT TRY TO PRINT ERROR REGISTER 
;ERROR MESSAGES, — THERE IS 
:IS NO ERROR REGISTER 


; TYPE OF PROCESSOR TEST: THIS INSTRUCTION 

: a ON NEWER PROCESSORS -_) PLACES 
: ODE IN THE LOWER BYTE OF RO T 

; DOICATES THE PROCESSOR TYPE. i= a1i7ee 
3 ww 

s4OV THE CODE TO PROTYP 

:IS THIS AN 11/24? 


s;BRANCH IF NOT - WE HAVE AN 11/44 
;NO SUPERVISOR MODE 

;sMAKE TEST MODE USER 

; TRAPS GO TO 118 3R-C 
;CLEAR THE FLAG ;R-C 
:IS THERE A CPU ERROR REGISTER? ;R-C 
:s¥eS - TRAPPED os 


004202 


/ 


a 
S 


DIAGNOSTIC 


IZER 


012737 
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se 
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SANE 


SUBTS" <«<INITIALIZE VAR. SLES TO NON ZERO>> 


§ FSSSSSSSSSSSSSSSSSSESSSSSHSSESESESEEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEES 


3; @SUBTEST INITIALIZE VARIABLES 1'O NON ZERO 
f POOOSOSESESEEEOEEESEESEESESOEEEESEOEEOEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEOEES 
WOR S 
MOV @3.FLIPLOC 
SET HEADER 
MOV #176543 ,MSEEDH 
MOV #123456 , MSEEDL 
MOV MSEEDM , SEEDHI sPRIME THE RANDOM NUMBER GENERATOR 
Ov MSEEDL . SEEDLO :;8CTH HIGH AND LOW WORDS 
MOV 377 .BAKPAT 
MOV 177400, SWAPAT 
SUBTST <<INITIALIZE VECTORS>>» 


; SUBTEST INITIALIZE VECTORS 
S SSSSSSSSSSSSSESSESSSSSSSESSSESSOSEESESESESEESESESEESESCFESEEEEEEEEEESEEEEEEHEOEEES 
@sSCOPE LOTVEC ssIOT VECTOR FOR SCOPE ROUTINE 
0345, IOTVEC ;sLEVEL 7 
esERROR EMT C s;€MT VECTOR FOR ERROR ROUTINE 
es TRAP  TRAPYE coe. Tear ‘VECTOR FOR TRAP CALLS 
sé L 
5ao, Yaaurrss it 
C ie hE FAILURE VECTOR 
340,PURVEC+2 =, LEVEL 
spaniTy PARVEC GET READY FOR PARITY ERRORS 
sori 105. sRESVEC;RESERVED INSTRUCTION TRAP 
eT TineouT. ERRVEC SETUP TIMEOUT ERRORS 
0340 ERRVEC +2 ;SET PRIORITY OF ERROR TRAPS 
OMMTRAP , MVE :VECTOR FOR MEMORY MANAGEMENT 
o340, HEC eS. 


; TURN CACHE ON 











par 


GRTPORE TE Net a! ANOS 


5398 


004432 


006001 
012715 
0627053 
000207 


026416 


kg 
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SUBTST <<«INITIALIZE PATTERNS> >» 
§ FSSSSSSSSSESSSSSSSSSSESSSESSSESESSEEEEESEESEEESEEEEEEEEEEEEEEEEEEEEEEEEEEEOEEHEBEE 
; ¢SUBTEST INITIALIZE PATTERNS 
POP rrririiiririrririrrrirririririrririe 
sTHE APT E-TABLE DETERMINES WHICH PATTERNS ARE GOING [0 BE RUN. 
sEACH BIT SET REPRESENTS A PATTERN TABLE ENTRY THAT IS TO BE LEFT 
sALONE (TO BE RUN). EACH BIT CLEARED REPRESENTS A PATTERN TABLE ENTRY 
aoe Is . ene WITH THE ADDRESS OF A NULL PATTERN. 


os P 

MOV CRO)+,R1 

MOV PKCSRT,RS 

MOV 16. ,R2 

CALL PATPLUG 

MOV CRO)}-« Ril 

MOV 06. ,R2 

CALL PATPLUG 

MOV (RO )- Ri 

MOV OPKPAT, 

MOV #16. ,R2 

CALL PATPLUG 

MOV CRO)>,R1 

MOV @6. ,R2 

CALL PATPLUG 

MOV CRO)+ ,R1 

MOV AT, 

MOV #16. ,R2 

CALL PATPL 

MOV CRO)+,R1 

MOV 06. ,R2 

CALL PATPLUG 

BR 
PATPLUG:SUBTST <<SUBR PLUG IN NULL PATTERNS>> 
F SSSSSHSSSSSESSSESSSSSESESESSESSESESSSESESESESESSSESSESSESOESEEESESESSSESESSSSESEESCESEESE 
3 *SUBTEST SUBR PLUG IN NAL PATTERNS 


§ SOROOOSOOSOSOESESSESSOEOSESEEHEEEEOEEOESEEEESOEEEEEEEESESEEEOEEEEESESEEEDESEESS 
ie -_ TO R2 


.NOERROR 
MOV OMTO999,.(R3) 
END ;OF ON. ERROR 
re 

RE TURN 


;IF CARRY CLEAR 


004606 


012700 
005020 
022700 
0013574 


012737 


0127357 
012737 


000405 
012716 
000002 


012737 
012737 


> SE pM OTAGNOS TEE. 


003652 


177570 
177570 


004700 


000176 
000174 
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002602 


miiis 
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SUBAAA; SUBTST <<CLEAR THE CONFIGURATION TABLE>> 
rrr iiiriririiitiriiiriririirririririrree 
; *SUBTEST CLEAR THE CONFIGURATION TABLE 
PPP riiririririiririiiririiririiiirriririrrirrreerre 
sTHIS ZEROS CUNLESS WE STARTED AT ADDRESS > Sl THE CONFIG TABLE 
ge ag Is — DISCRIBED AT LOCATION “CONFIG 
IF RESTART IS FALSE 


MOV G,RO 
1s: CLR CRO) 
CMP @CONFIEND,RO 


BNE is 
END ;OF IF RESTART 
.OSABL LSB 
MOV oBIT1,CPUBIT sSET IO BIi 
SUBTST <<SIZE FOR A HARDWARE SWITCH REGISTER>> 


J SOSSSSHSSSSSESSSSESESSEESEHSESESEESEEEEEESESEEESEEESEEESESESEEESEEEEEEEEESESEEOEEE 


; *SUBTEST SIZE FOR 4 HARDWARE SWITCH REGISTER 


§ FSSSSSSSESHSHESSSSESESESESSESSESEESESEEEHEEESSEEESEEEESEDESEESEEEEEEEEESESEESCEEERESEEOES 


s3IF NOT FOUND OR IT IS 
; EQUAL i “"-1", SETUP FOR A SOFTWARE SWITCH REGISTER. 


SET4 o3% sTRAPS TO 4 ogi 3% 
MOV @OSUR , SWR +sSETUP FOR A HARDWARE SWITCH REGISTER 
MOV @ODISP ,DISPLAY AND & DISPLAY REGISTER 
IF @-1 EQ SSW ;IF NO TRAP FROM REFERENCE TO @SWR AND aSWR - ¢-1 
BR 2s 3;BRANCH IF NO TIMEOUT 
38: are 2% ,(SP) 1 iSET UP FOR TRAP RETURN 
2s: RES4 sRESET TRAPS TO 4 TO DEFAULT 


OSWREG , SWR 3s;POINT TO SOFTWARE SwR 
MOV eOISPREG, DISPLAY 

= ;0F IF @- 
OSABL (SB. 


E+1 
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SIZE FOR A HARDWARE SWITCH REGISTER 

5468 004756 SUBAAB: SUBTST <<SETUP ACT, APT, E KXDP>> 
j POSSESS ESEOEEEOEESE SORE EEOESEEOEEEEEOEESEEEEEOESEESESEEOEEESESEEEEESEEOEEEEEOESS 
3 ¢SUBTEST SETUP ACT, APT, & XXDP 
errr rrririirirririitirirrirriririrriririiriy 

5469 sTHIS SETS UP A BUNCH OF FLAGS TO TELL THE PROGRAM EVERYTHING 

5470 sIT CARES TO KNOW ABOUT APT, ACT, E XXOP. 

5471 004736 005037 063104 CLR $PASS ;CLEAR PASS COUNT 

S472 004742 IFB @BITS a f IN SENVM 

5473 004752 SET $TPFLG s INDICATE NO TERMINAL 

S«74 004760 ENO ;OF IFB OBITS 

5475 004760 IF6 OBIT? SET.IN SENVM 

5476 004770 SET APTSIZE 

5477 004776 END ;OF IFB OBIT? 

5478 004776 IFB SENV EQ @1 

5479 005006 SET APTFLAG, QVFLAG, $AUTO, QUICK 

5480 005036 012737 045252 000024 MOV @APTDOWN, PWRVEC 

5461 005044 012737 063120 002600 MOV OSSWREG, SUR sUSE APT SWR 

5482 005052 ELSE 

5483 005054 IF 42 NE @STACK AND 42 NE 00 

3484 005072 SET QVFLAG, SAUTO 

5485 005106 IF 42 EQ @$ENDAD 

5486 005116 SET ACTFLAG 

5487 005124 ELSE 

5486 005126 T XXDPCHAIN 

5489 005134 END ;OF IF 42 

5490 005154 END ;OF IF 42 


5491 005134 END ;OF IFB SENV 


Pit 
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SETUP ACT, APT, E& XxDP 

54935 005154 SUBTST <<PROTECT PROGRAM € LOADERS>> 
£ PSSSSSSSSSSSSSSSSEESSESESSSESESESESEEEESEHEHESESEEEEEESCEEEEEEEEECESESEESESCEESEEROEEEEEEEEE 
; ¢SUBTEST PROTECT PROGRAM € LOADERS 
F SSSHSSSSSSSSESSSSSSSSEESEEESEESSESESEEEEEESEEEEEEEEEEEEEEESECEEEEEOEEEEEEEEEEESEEEEE 

5494 0051354 052737 000200 002626 BIS oBIT7,COM IG sPROTECT PROGRAM SPACE (B&NK 0) 

5495 005142 052737 000200 002652 BIS eBIT7, _ sPROTECT LOADER SPACE (BANK 1) 

5496 005150 IF @S8ENDAD NE 4 sNOT ACT-11? 

5497? 005160 TYPE HSGO00 ; TYPE PROGRAM TITLE 

Sean 005164 END ;OF IF @tENDAD 

£500 005164 SUBTST <<CHECK SYSTEM FOR CACHE>> 
§ FSSSSSSSSESSSESSSSESESSESEEEEESEEEEEEHESEEEEEEEEEESEEEEEEESEEEEEEESEEESESEEEEEEESES 
1 ¢SUBTEST CHECK SYSTEM FOR CACHE 
§ SSSSSSSSHSSSHSSSSSSESSESSEEESEEEESESHEEESEEEHEEEESEEEEESEEEEEEEEESEEEEESEEEEEEESEEEEE 

5501 3* THIS FIGURES OUT IF THERE IS A CACHE ON THE SYSTEM, 

$502 :¢@ WHAT TYPE OF SYSTEM IT IS, AND WHETHER IT IS ENABLED 

5505 3@ OR DISABLED. 

5504 005164 SET4 o3% 

S505 005172 0057357 177746 TST CONTRLL sIS THERE A CONTROL REGISTER? 

5506 005176 SET4 2% 

5507 005737 177750 TST MAINT 31S THERE A MAINTENANCE REGISTER? 

5508 005210 SET4 #18 

5509 005216 005737 177754 TST DATARG 31S THERE A DATA REGISTER? 

5510 TYPE MSG117 s 11744 

5511 000405 BR ay 

SSi2 005230 1$ TYPE MSG116 ; 11/34 

5513 005234 000402 BR at 

5514 005236 23: TYPE MSG118 s 11760 

15 005242 052737 000014 177746 4% BIS @BIT2:81T3S,CONTAL sSET CACHE DISABLE BITS 

5516 005250 042737 000014 177746 Bic @6IT2:81T3,CONTRL sCLEAR CACHE DISABLE BITS 

5517 005256 032737 000004 177746 BIT e8IT2,CONTRL 11S THE BIT SET? 

5518 005264 001004 BNE 78 sBRANCH IF THE BIT IS SET 

5519 005266 032737 000010 177746 BIT e6ITS,CONTRL i1S THE BIT SET? 

S520 005274 001413 BEQ 6% ;BRANCH IF THE BIT IS SET 

3521 005276 78: TYPE MSG121 ; CACHE BYPASSED 

005302 CACHOF F 
0135737 002516 002520 MOV CACHKN , CACHKN> 2 sSAVE INFO ABOUT CACHE | 
S524 005312 005037 002516 CLR CACHKN s;CACHE CANNOT BE USED - IT'S BYPASSED 
5525 005316 BR 8s 
005320 3%: TYPE MSG119 ; NO 
S527 005324 6%: TYPE MSG120 ; CACHE AVAILABLE 


iy ee Me bon a thee?’ Ic 


5575 


005550 


104407 


104422 
104420 


0024 30 


030000 
010000 


030000 
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177776 
177776 


177776 


Gili 


14 JAN-62 16:15 PAGE 155 SEQUENCE 


SUBTST <<SETUP USER & SUPERVISOR STACK>> 


§ PSSSSSSSSSSHESSESSSEEESSEESSSEESESEESEEESESESESSESESEESEESESEEESEEELSEEEEEEEEEECOEEEESEEEE 


;@SUBTEST SETUP USER € SUPERVISOR STACK 


§ SSSSSSSSESSSSESSSSSHSSSSESSSEASSESSSESEESSESESESESESESESESEEESEESEEEEEESEEEEESEHECEEESEEEEEES 


8%: DEENERGIZE ;TURN OFF MEMORY MANAGEMENT 
TST NOSUPER 31S THERE A SUPERVISOR MODE? 
BNE S$ sNO-SKIP SUPERVISOR SETUP. 
;SET PREVIOUS MODE TO SUPERVISOR 
BIC OBITIS:6I1T12,PSw 
BIS oBIT12.PSW 
PUSH @SUPSTK 
MTPI ssP 
;SET PREVIOUS MODE TO USER 
S$: BIS OBITIS!BIT12,PSwW 
PUSH OUSESTK 
MTPI USP 
SUBTST <<GET SOFTWARE SWITCH REGISTER IF NECESSARY >> 


s SSSSSSSHSSSSSSSSSSSHSSESSESSSESEEESEEHESEESESESESEEASSEESSEEOSESSEEESEEOEEEEEOEEEEEBEOEE 
; *SUBTEST GET SOFTWARE SWITCH REGISTER IF NECESSARY 
S SSSSSSSSSESSSSSSESSESESSSHESSESSASSESESSEESESSESRESHSESESESESSESEEESSESEESEEESSEEEEEEEEEEEESE 
IF sAUTO IS FALSE ;IF NOTCAPT OR ACT) 
IF SWR EQ @SWREG ;IF SOFTWARE SWITCH REG SELECTED 
GTSWR 3;3GET SOFT-SWR SETTINGS 
END ;OF IF SWR 
END ;OF IF sAUTO 


SUBTST <<GET MEMORY MANAGEMENT READY>> 
FS SSSSSSSSSSESESSESSSSSSSSSSSSSSESESHESESHESESESESESES*SESEEESSEEESEEESESEESSEESEESEEEEESOHEEES 
;@¢SUBTEST GET MEMORY MANAGEMENT READY 
ee ee ee a ener nen netooncnneneccnseese 
;MAP KERNEL SPACE 1 
sMAP SUPERVISOR SPACE. cTest AREA) 1 TO 1 
MANAGEMENT 


MAP 
ENERGIZE ; TURN ON MEMORY 


1 56 


Hil 
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SFR be UMP ROLES 


5618 005456 NEWTST <<@IT TEST OF ALL CSR’S>> 
JF SSSSSHSSSSSHSSSSSESSESSESSSEHESHESESSSEEESESESEEEEEAEEHCESESESEEEEEEEHEEEEEEEEEEOEEEEEOEE 
seTEST i BIT TEST OF ALL CSR‘S 
§ SOSSSSSHSSEOSSESSESESEEEEEEESEEEEEEDESEEEOESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEHEEEEES 
0054356 090004 TSTl: SCOPE 
5619 ;¢ THE FIRST PART OF THE CONFIGURATION ANALYSIS DOES THE FOLLOWING 
5620 i¢ 1) FINDS WHICH CSR‘S RESPOND, AND PUTS THEM INTO oo CSR INFORMATION 
5621 ;¢ TABLE, AND STORES ANOTHER BIT FOR “TOTCSRS” 
S622 :¢ 2) TESTS THE CSR BITS COMMON TO ALL CSR’'S. 
5625 3¢ 3) FIGURES OUT IF THERE IS AN EUs SIT. AN ECC BIT, AND THE EXISTANCE 
5624 3° OF THE ERROR ADORESS BITS, AND MARKS THIS IN THE CSR 
5625 :¢ INFORMATION TABLE. 
566 3¢ 4) TESTS THE BITS PARTICULAR TO THAT TYPE OF CSR. 
5627 3° 5S) IF ANY BITS TEST BAD IN THE CSR UNDER TEST, THE CSR Ox BIT IN THE 
5628 ;¢ CSR INFORMATION TABLE IS CLEARED. 
5629 ;¢ THE INFORMATION BITS ONE THROUGH THREE FORM A CODE WHICH GIVES IME TYPE 
5630 ;¢ OF CSR: 
5631 ;° ERR. ADOR. PARITY NOT EUB 
5632 3¢ TYPE BIT2 BIT BITO CODE TOTALS 
5633 ;* UNIBUS PARITY 1 i 1 7 
5634 ;* MS11-L 1 1 0 6 
5655 ;¢ he 1 0 1 5 
5636 ;* MSi1-M i 0 0 4 
ae :¢ 11745 BIPOLAR 0 1 1 3 
;* 
5639 ;* THIS MEMORY CODE WILL BE USED IN THE SECOND PART OF THIS ANALYSIS 
5640 3* 
5641 005440 005005 CLR RS :R5 IS THE TOTAL CSR WUMBER 
5642 005442 005000 CLR RO sRO IS A TABLE INDEX 
3 005444 012703 172100 MOV @CSRADD .R5S iR3 HAS THE CSR ADORESS 
5644 005450 012737 1 002074 MOV @1,NOPAR s IGNORE PARITY ERRORS 
5645 005456 SET4 2% 
005464 005713 18: TST (R3) s00ES THE CSR RESPOND? 
5647 005466 052705 000001 BIS #1,R5 
005472 CLR = sCLEAR THE LAST CSR INDICATOR 
5649 005474 052760 000007 002434 BIS 7,CSRINFOCRO) ;SET ALL THE MEMORY INFO BITS 
5650 005 052760 000030 002434 BIS eeitat81T3, CSRINFOCRO) 3YES-MARK IT IN CSR INFORMATION TABLE 
5651 005510 004537 006044 JSR TES TEST BIT O AND 15 
5652 005514 100001 . WORD BIT1S!BITO 
5653 005516 012713 040000 MOV @617T14,CRS) :IS THERE A BIT 14 RESPONDING 
005 032713 040000 BIT eB1T14,(R3) iC IT'S THE EVB BIT) 
5655 005526 001403 BEG 3$ sBRANCH IF NO EUB BIT 
5656 005530 042760 000001 002434 BIC @BITo, CSRINFOCRO) fg’ EVUB INFO IN THE a TABLE 
5657 005536 005013 3%: CLR CR3) AR THE CSR UNDER TEST 
5658 005540 012713 020000 MOV @BIT135,(R3) :00€S Blt 13 RESPOND 
5659 005544 032713 020000 BIT + ella (R3) s(TO TEST FOR ECC CSR) 
005550 001417 BEG 4&4 ;BRANCH IF NOT ECC CSR 
5661 005552 042760 000002 002434 BIC *sITi, CSRINFOCRO) s;CLEAR PARITY INFO IN THE CSR TABLE 
005 012713 020000 MOV eB1T13, CR3) 3SET THE = weed MODE POINTER TO 1ST 16K 
5663 005564 004537 006044 JSR RS, TEST STEST BIT 3 
5664 005570 000010 -WORD BITS 
5665 005572 012713 0200/0 MOV BIT13,(R3) 
5666 005576 004537 006044 JSR RS, TEST sTEST BIT 1 AND 4 
000022 .WORD BIT4!BIT1 
012715 020000 MOV OBIT13,(R3) 


Ii] 
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SIT TEST OF ALi CSR’S 
5670 005610 0045357 006044 4%: JSR RS,TEST sTEST BIT 2 
5671 005614 000004 .WORD 6BIT2 
3672 005616 005015 CLR (R3> | 
5673 005620 052715 007740 BIS @7740,(R3) sARE THERE ERROR ADDRESS 6115? 
5674 005624 0327:3 007740 BIT 07740,(R3) 
5675 0056350 001404 BEG S$ sBRANCH IF NO ERROR ADDR. BITS. 
5676 005632 004537 006044 JSR RS,TEST sTEST BITS S->11 
5677 005636 007740 .WORD 7740 
5678 005640 000405 BR 6% sSKIP OVER THE INFORMATION REPORTING 
5679 005642 042760 000004 002454 5%: BIC *eIT2, CSRINF OC RO) sREPORT THAT THERE ARE NO ERROR ADDRESS BI'T.. 
5680 005650 0352760 000002 002434 6%: BIT il CSRINFOCRO) ;IS THIS CSR AN ECC CSR? 
5681 005656 001014 BNE s;BRANCH IF NOT 
5682 005660 032760 000001 002434 BIT #810, CSAINF OC ROS s1S THE EVUB BIT SET? 
5683 005666 001410 BEQ ANCH IF IT IS 
5684 sWE MUST "Now TEST FOR MSi1 -M ON THE UNIBUS 
5685 005670 0127135 007760 MOV #7760,(R3) sPUT PATTERN € SBE BIT INTO BITS 4->11 
5686 005674 0227135 007760 CMP a (R3) s ARE THEY STILL THERE? 
5687 005700 001403 BEQ sYES - BRANCH FOR IF 11S-K CSR 
5686 005702 042760 000001 002434 BIC eBITO, CSRINFOCRO) iNO. - SET EUB BIT FOR MS11-M 
3689 005710 005015 78: CLR CR3) sCLEAR CSR 
5690 005712 022760 000040 002434 CMP 040, CSRINFOCRO) iTS THIS A LEGAL CONFIGURATION? 
5691 005720 100004 BPL $ ANCH IF IT’S LEGAL 
005722 016037 002434 002050 MOV CSRINFOCRO).BAD 
5693 005730 104021 ERROR ;ILLEGAL TYPE ERROR 
35694 005732 032760 000004 002434 10%: BIT eat2. CSRINFOCRO) sD0ES THIS CSR HAVE ERROR BITS 
5695 005740 001016 BNE sBRANCH IF TRUE 
3696 005742 000002 002434 BIT eer"). CSRINF OC RO) sARE THE OTHER 2 BITS SET? 
5697 005750 001404 BEQ is If NOT 
5698 005752 O82760 000001 002434 BIT eerr0, CSRINFOCRO) 
5699 005760 001006 BNE 
5700 005762 016037 002434 002050 i115: MOV ESRINFOCRO), BAD 
5701 005770 104021 ERROR + sILLEGAL TYPE ERROR 
3702 005772 005060 002434 CLR CSRINFOCRO) sCLEAR THE CSR INFO-IT WILL NOT EXIST IN THE PROGRAM 
57035 005776 062700 000002 2s: ADD #2,R0 s INCREMENT TO NEXT CSR TABLE 
3704 006002 062703 000002 ADO @2,R3 S INCREMENT TO NEX’ CSR 
3705 006006 006 ASL RS 
3706 006010 103001 Bcc 8% :IS THERE A CSR 0? 
3707 006012 INC R4 sYES - SET CSR PRESENT FLAG 
3708 006014 022700 000040 8s: CMP #40 ,RO s;ARE WE DONE? 
5709 006020 001221 BNE i$ :BRANCH IF MORE TO DO 
5710 006022 000241 CLC 
5711 006024 006005 ROR RS sRESYNC RS 
5712 006026 005704 TST fia sWAS THERE A CSR 0? 
5713 006030 001402 8EQ 9% sGRANCH IF NOT 
5714 006032 052705 100000 BIS #6ITiS,R5 sYES - SET IN THE CSR TABLE 
3715 006036 010537 002220 98: MOV RS, TOTCSRS sSTORE RS IN TOTCSRS 
5716 006042 000437 BR CTEST 1 JP SUBROUTINE 
$717 sTHIS SUBROUTINE TESTS THE CSR BITS 
5718 006044 012501 TEST: MOV CRS )+ Ri sGET THE BIT TO TEST 
5719 006046 050113 BIS R1,CR3) :SET THAT IN THE CSR UNDER TEST 
5720 006050 0301135 BIT R1,CR3) 31S THE BIT STILL THERE? 
5721 006052 001015 BNE is sBRANCH IF STILL THERE 
S722 006054 011337 002144 MOV agg EO sREAD CSR 
5723 006060 010137 002042 MOV 1 ,.GOO0D 
5724 006064 032713 100020 BIT oBiT15:8IT4,(R3)sIS IT BECAUSE OF A SBE OR DBE? 
5725 006070 001004 BNE 1% sGRANCH IF IT IS 


5726 006072 104035 ERROR +35 :BIT SET ERROR 


T1 
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2024 54 


002434 


18: 


2s: 
TRACE : 
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BIC OBITS,CSRINFOCRO) ;CLEAR CSR Ok BIT 

BIC R1,(R3) ;sCLEAR THE SELECTED BIT 
BIT R1,C(R3) sIS IT CLEARED? 

BEG 2s sBRANCH IF IT IS CLEARED 
MOV (R3),CSR s;READ CSR 

MOV R1,GO00 

BIT OBITiS!BIT4,(R3);1IS IT BECAUSE OF A SBE OR DBE? 
BNE 2s oy + IF TRUE 

ERROR +10 sBIT CLEAR ERROR 

BIC OBITS, CSRINFOCRO) ;CLEAR CSR OK BIT 

RTS RS 

.WORD 0 


SE QUE NCE 


. r 
149 


000000 
172100 
000002 


177773 
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002504 
172350 


002364 
002366 


002434 
172100 
000000 
000002 


172100 
000000 
000002 
172100 


002434 


000000 
000002 
177777 
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3E QUENCE 


; THE FOLLOWING ROUTINE DETERMINES WHICH CSR CONTROLS PROGRAM SPACE 


3 
CTEST: 


4%: 
18%: 


2s: 


S$: 


68: 


78: 


6t: 
38: 


CACHOF F 


@177777,PGMCSR 


@100002, TESTADD+2 
RO 


CSRNO 
TOTCSRS ,R3 


os 


@BIT2,CSRADD(RO) 
0123456, @(R1) 
#123456, aoc Ri) 
CSRADOCRO) 


CSRADD( RO), RS 
oe 
RS 

8% 

is 

@-5, 


R4 
@rCi77, R4 
#157, R4 


a2(R1) 
a” 0177777 
CLRMER 


;SET UP MAP REGISTER 


;CLEAR CSR COUNTER 


;OB TAIN CSR MAP 

;DEBUG AID 

sPUT HIGH ORDER BIT INTO C BIT 
;sBRANCH IF CSR EXISTS 

sUPDATE CSR COUNTER 


:I1S MAP EMPTY? 
sBRANCH IF SO 


sDEBUG AID 

;CLEAR CARRY 

:1S THIS PARITY MEMORY? 
;BRACH IF NOT 

:SET WRITE WRONG PARITY 
sWRITE DATA 


sRESTORE CSR 


;CLEAR THE CSR UNDER TEST 
;WRITE DATA 


sSET DIAG CHECK MODE 
sWRITE CHECKBITS TO CSR 
;sWRITE CSR TO R4 
;PARITY MEMORY? 


;DEBUG AID 


; CORRECT Ba aly 
;BRANCH IF NOT 


;sDEBUG AID 
;CLEAR ALL CSR'S 
sRESTORE TEST LOCATIONS 


;IF PROGRAM CSR NOT FOUND GO TO FINT 
3GO TO SIZING ROUTINE IF FOUND 


1490 


012771 
012771 
37 
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123456 
123456 
010000 


177776 
002220 


177776 
002220 


000002 
002146 


020006 
177776 
000002 
000002 
002146 
000040 
172100 
177773 


177600 
000157 


MACRO M1115 


000002 
172350 


172100 


172350 


172100 


) 
; IF PGMCSR WAS NOT FOUND BY THE PRECEEDING ROUTINE, 
310 FIND IT FOR INTERLEAVED MEMORIES 


‘ 
F INT: 


18: 


2s: 
38: 


4%: 
5$: 


63: 


7%: 


233: 


243: 
25%: 
&$: 


ay Fi 
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SET4 


02% 

0123456 ,a(R1) 
0123456 ,,82(R1 ) 
©10000 , KIPAR4 


10% 

see» ahaa »R4 
erci77, R4 
a RG 


23% 


CSRADOCRO Re 
orci77, R4 
0157,R4 


SEQUENCE 


THIS ROUTINE TRIES 


;NE MEMORY TRAPS GO TO 2 


241 


sWRITE DATA AT FIRST LOCATION OF BANK 2 IN BOARD 


sWRITE DATA AT SECOND LOCATION OF BANK 2 IN BOARD 
sUPDATE PARS TO POINT TO UPPER BOARDS 


sKEEP GOING TILL NO MORE MEMORY 


sPUT CSR MAP IN R35 
sUPDATE CSR COUNTER 
;UPDATE CSRNO 


; BRANCH IF er ‘aioe 


‘ : 
sLOOK FOR NEXT CSR 
sSET yyy — MODE IN CSR 


;UPOTAE CSR POINTER 


sNOT FOUND? 
;BRANCH IF NOT 
sGET CSR CONTENTS 


;CLEAR ALL BUT CHECKBITS 

;PROPER CHECKBITS? 

sBRANCH IF SO | 

;TRY NEXT CSR IF NOT 

;sWRITE NON-ASSERTED CSR ® IN PGMCSR 
sNE TRAPS GO TO 8% 


;PUT CSR MAP IN R3 
sUPDATE CSR COUNTER 
:UPDATE CSRNO 


;BRANCH IF CSR EXISTS 
;ANY CSR‘'S LEFT? 

;BRANCH IF NOT 

3L00K FOR NEXT CSR 

:SET DIAGNOSTIC CHECK MODE IN CSR 
;LO0K FOR NEXT CSR 


;TEST ASSERTED LOCATIONS 


;PROPER CHECKBITS? 


CZMSDDO 
Ti 
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502 
012757 


012771 
012771 


002505 
100000 


002504 
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9%: 


11%: 
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9% 


8s 
RO,PGMCSR+1 
©61T15,PGMCSR 


22000 , KIPAR4 
12% 

#0,@(R1) 
©0,82(R1) 
@10000, KIPAR4G 


SEQUENCE 142 


;BRANCH IF SO 
;TRY NEXT CSR IF NOT 


 g WRITE ASSERTED CSR © IN PGMCSR 


;SET INTERLEAVED INDICATOR IN PGMCSR 


NE MEMORY TRAPS GO TO 12$ 
; WRITE DATA AT FIRST LOCATION OF BANK 2 IN BCARD 
s;WRITE DATA AT SECOND LOCATION OF BANK 2 IN BOARD 
;UPDATE PAR4 TO POINT TO UPPER BOARDS 


;ERROR - PROGRAM CSR NOT FOUND! 
;SET TO DEFAULT OF O 


Nid 
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BIT TEST OF ALL CSR'‘S 

5866 007040 SUBTST <<CLEAR ALL MEMORY SPACE FROM BANK 2 ON>> 
£§ FSSSSSSSSSESHESESSESESSESSSSEESSESEESHEHEESESEEEESESEEHEESEEEEEEEEHEEEEEEEESEEEEEEEOEEEEEEES 
; *SUBTEST CLEAR ALL MEMORY SPACE FROM BANK 2 ON 
YE pay RNa sig @iicns aga naam ta apiani le lame teeta s 

5867 

5868 ‘THIS ROUTINE CLEARS ALL MEMORY SPACE BEGINNING AT ADDRESS 200,000 AND 

5869 ;CONTINVES UNTIL THERE IS NO MEMORY LEFT. IT SHOULD CLEAR ANY PARITY ERRORS 

5870 S CREATED BY THE LAST ROUTINE, AND CLEAN UP ANY JUNK LEFT HANGING AROUND IN 

| dt sHIGHER MEMORY. 

2 3 

5873 007040 CLRMEM: SET4 @CLREX sNONEM TRAPS GO TO CLREX 

5874 007046 005037 006140 CLR TRACE 

5875 007052 012737 000001 002074 MOV #1,NOPAR ; IGNORE PARITY ERRORS 

5876 007060 012737 002000 172350 MOV @2000 , KIPAR4 sSET UP MAP TO oo AT BANK 2 

5877 007066 012701 100000 MOV #100000 ,R1 :R1 MAPS TO KIPAR 

58768 007072 020127 117776 1$: CMP R1,0117776 sWHOLE 16K BANK DONE? ;R-C 

5879 007076 0010035 BNE 2% ;KEEP GOING IF NOT 

5880 007100 012737 177777 006140 MOV @-1, TRACE ;USE TRACE FLAG TO FLAG END OF BANK 

5861 007106 005021 2s: CLR CR1i)- ;CLEAR CONTENTS &€ INCREMENT 

5862 007110 005737 006140 TST TRACE ;EOB FLAG SET? 

5883 007114 001001 BNE 3$ :;GO TO NEXT BANK IF SO 

5864 007116 000765 BR 1$ 

5885 007120 062737 000200 172350 3%: ADD 6200 ,KIPAR4 ;SET MAP FOR NEXT BANK ;R-C 

5886 007126 005037 006140 CLR TRACE ;sRESET FLAG 

58687 007132 012701 100000 MOV #100000 ,R1 ;sRESET R1 

5888 007136 000755 BR 18 ;CLEAR NEXT BANK 

5889 007140 000240 CLREX: NOP 

5890 007142 005037 006140 CLR TRACE 


S894 007170 


5929 12 
5930 007214 


5947 007310 
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SPACE *ROM BANK 2 ON 


000011 
002532 
000004 


001000 
001000 


000002 
002146 


002530 


172350 
172352 


Ol. 
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ANA2: SUBTST <«MATCH ALL CSR'S WITH MEMORY>> 
§ SSSOSSSSSSSSSSSSSESOSSSESESEESSESEESESESESEEEEEEEEESESESEEEEEEESEEEEEEEEEEEEEEEEEEEE 
;¢SUBTEST MATCH ALL CSR’'S WITH MEMORY 
S St Gneeen Geet GF tee fe seek Geneee i tun fae a unto ne oo eeeee 
;@ THE SECOND PART OF THE ANALYSIS MATCHES UP THE CSR'S WITH THE MEMORY, AND 
:¢ INSTALLS ALL THE INFORMATION FOUND IN THE CONFIGURATION TABLE. FOR ECC, 
:¢ THIS IS DONE BY TAKING EACH CSR FOUND IN THE ora SECTION SEQUENTIALL¥ 
:@ AND CHECKING THROUGH ALL OF MEMORY, ONE BANK A 
:¢ RESPOND TO THE CSR IN QUESTION. THE FIRST 
WRITTEN WITH DATA AND DIAGNOSTIC CHECK 
° IBLE CONFIGURATIONS 
126K INTERLEAVED) ARE ACh BANK 
KERNEL INSTRUCTION PAGE ADDRESS REGISTERS 4 AND 
CHECKBITS af WE WAVE A MATCH. IF NOT, THE ROUT 
,¢ INE CHECKS Fon SINGLE OR DOUBLE BIT ERRORS. 
THE ERROR ADDRESS IS CHECKED 


:* IF ONE OR THE OTHER IS FOUND, 
;* TO SEE IF IT IS THAT BANK. IF IT IS, WE HAVE A MATCH. AT THE END OF EACH 
CSR PASS, THE PROGRAM COMES UP WITH A NUMBER, STORED IN 















;¢ BANC PASS. FOR EACH 








;@ I", waICM DENOTES THE FOLLOWING 

S 

- I MEMORY DESCRIPTION 

& _-q = _—_——— a. @ »aee ses « @€e &< 

< 0 NON -EXISTANT ME MOR 

se 1 NON-INTERLEAVED MEMORY 

:° 2 64K INTERLEAVED, Al NOT ASSERTED MEMORY 
se 5 128K INTERLEAVED, Al NOT ASSERTED MEMORY 
50 8 64x INTERLEAVED, Al ASSERTED MEMORY 

;e S Sax INVEMLEAVED. 21 ASSERTED Vevey 

;@ 

1@ NOTE - Ie2 THROUGH I=5S CAN ONLY OCCUR WITH MS11-M MEMORY. 


THEN .OOFS 


;¢ 
3@ MOTE THAT PARITY MEMORY WRITES WRONG PARITY TO THE DOUBLE WORDS. 
a WE HAVE A MATCH. 


;¢ FOR THE PARITY ERROR BIT 70 BE SET. IF THE BIT IS SET, 






SET4 #1005 ;NE MEMORY TRAPS GO TO 1008 
CLR CME CK ;CLEAR CHECK 
MOV @TESTADO Ri sSET WP THE VIRTUAL ADOR. POINTER 
MOV TOTCSRS RS sMOVE CSR MAP INTO RS 
CLR RO sCLEAR THE CSR POINTER 
CLR RS :CLEAR THE PROGRAM CSR STATUS POINTER 
TST NO22B IT sIS THIS AN 11744 OR 11/247 
BEG 78 sBRANCH IF IT IS 
CLR LAS TBLOCK SAD JUST LASTBLOCK INDICATOR FOR 124K MACHINE 
8R is BRANCH 
78: CP #167 .LASTBANK 
8EQ is NO 
MOV LAS TBANK ,R2 :SET UP A NEW LAST BLOCK INDICATOR 
INC | 
ASH »R2 
MOV Ra: ASTBLOCK 
i$: MOV sR2 IS INDEX FOR CONFIG TABLE 
MOV 21000. KIPAR4 :SET KIPAR4 FOR BANK 1 
MOV #1000 ,KIPARS sSET KIPARS F i 
2s: ASi R3 s00ES THIS CSR EXIST? 
Bcs 36 :BRANCH IF IT DOES EXIST 
ADD @2,RO0 ; INCREMENT THE CSR POINTER 
MOV RO, CSRNO is STORE IT IN CSRNO ALSO 


; PR MCE 


-44 


yo 
/ 
Nee 4 ‘ 





CZMSDOO 511.i../™ DIAGNOSTIC MACRO MLILS JAN-82 16:15 PAGE 163.1 Epes °4 
MATCH ALL CSR’S WITH MEMORY 
5948 007314 005703 TST Rs ;ARE THERE ANY MORE CSR S$ 19 DO? 
5949 067316 001370 BNE 23 ;BRANCH IF ALL CSRS DONE 
5950 007820 012737 001000 172350 MOV 01000, KIPAR4 ;RESTORE KIPARG 
5951 007326 0127387 001200 172352 MOV ©1200, KIPARS ;RESTORE KIPARS 
5952 007334 013706 002536 MOV KSTACK, SP ;RESTORE STACK 
5953 007340 000137 010540 IMP SUBAAS ; JUMP TO SUBAAS IF ALL CSR’S ARE DOM 
5954 007344 010037 002146 38: MOV RO, CSRNO ;MAKE SURE CSRNO IS UPDATED 
5955 007350 1 138:  CACHOFF ; TURN THE CACHE OFF 
5956 007352 NOP 
5957 007354 012737 100000 002364 45%: MOV #100000, TESTADO ;SET UP VIRTUAL ADDRESS TO KIPARs 
5958 007362 012737 120002 002366 MOV @120002. TESTADO+2 ;SET UP VIRTUAL ADDRESS TO KIPaRs 
5959 007370 032762 000040 002626 BIT @BITS, CONF IG(R2) :I1S THIS A BANK TO SKIP? 
5960 007376 001402 BEQ 43% iNO - BRANCH AROUND NEXT INSTRUCTION 
5961 007400 000137 010454 IP 63 ;YES - GO TO END OF BANK 
5962 007404 005037 002424 43s: CLR I :CLEAR THE MEMORY CONFIGURATION COUNTER 
5963 007410 005771 000000 43: TST acRi) ;TEST TO SEE THAT THERE IS MEMORY PRESENT 
5964 007414 005237 002424 INC I 
5965 007420 PUSH  @(R1),@2(R1) ;SAVE THE LOCATIONS UNDER TES” 
5966 007430 032760 000002 002434 BIT e8IT1,CSRINFO(RO) 11S THIS PARITY MEMORY? 
5967 007436 001414 BEQ 346 :NO - BRANCH 
5968 007440 0527 172100 gIs @BIT2, CSRADO(RO) ISET WRITE MRONG PARITY 
$969 007446 012771 123456 000000 MOV 0123456, @(R1) ;SET THE FIRST LOCATION UNDER TEST 
5970 007454 012771 123456 000002 MOV #123456, @2(R1) ;SET THE SECOND LUT 
5971 007462 172100 CLR CSR ;CLEAR THE CSR 
5972 007466 BR 418 ;TEST LOCATIONS 
5973 007470 012771 123456 000000 348: MOV 0123456, @(R1) iSET THE FIRST LOCATION UNDER TEST 
5974 007476 012771 123456 000002 MOV 0123456, @2(R1) ;SET THE SECOND L 
5975 00 104503 CLRICSR ;RESET CSR 
5976 00 104475 CB1CSR sSET DIAG. CHECK MODE IN CSR UNDER SST 
$977 007510 NOP ;DEBUG AID 
5978 007512 005771 000000 41s: TST ari) ;READ THE FIRST LUT 10 WRITE CKBITS. INTO CSA 
5979 007516 104426 READCSR ;READ THE CSR UNDER TEST 
5980 007520 000240 NOP :0€BUG AID 
$981 007522 013704 002144 MOV CSR.R4 :GET THE CHECKBITS FROM THE CSR 
5982 007526 NOP ;0EBUG AIO 
5983 007530 010437 002406 MOV Ra, TEMP ;SAVE IN TEMP FOR LATER 
5964 007534 104503 CLRICSR ;RESET CSR 
5985 007536 POP @2(R1),a(R1) ;RESTORE LOCATIONS UNDER TEST 
5986 032760 000002 002434 BIT @B1T1,.CSRINFO(RO) :IS THIS PARITY MEMORY? 
5967 007554 001404 BEQ 42% ;NO - BRANCH 
5968 007556 005 TST R4 ;0ID ME GET A PARITY ERROR? 
5989 007560 100414 BMI 25% :YES - FILL IN COMFIG TABLE 
5990 007562 000137 010454 IP 63 :NO - JUMP TO END OF BANK 
5991 007566 072427 177773 42s: ASH @-5,R4 | MANIPULATE THE CSR ‘8ITs 
5992 007572 704 177600 gIc @tCi77,R4 SINTO A USABLE F 
5993 007576 NOP ;0EBUG AID 
5994 007600 022704 000157 wane @157,R6 1DO THE CHECKBITS COMPARE TO WHAT WAS WRITTEN? 
5995 007604 001402 BEQ 253 ;BRANCH IF THERE IS A MATCH 
3996 007606 000137 010134 IP 22% ;ELSE BRANCH IF NO SAME 
;@ 
Foe ;@ WE COME HERE IF THERE IS A MATCH 
5° 
6000 007612 010006 253: OV RO,R4 ;GET THE CSR NUMBER 
6001 007614 ASR Re :SET IT UP FOR USE IN THE 
007616 000304 SWAB sé ;COMFIGURATION TABLE. 
6003 007620 042704 170377 BIC 0170377,R4 ;CLEAR OFF EXTRANEOUS BITS 
6004 007624 032737 000004 002424 BIT eBIT2,1 ;INTERLEAVED Al ASSERTED EMORY F OUND ? 


’ 
‘ 4 & i 











GEPRROR, Adet MLO PACNP ALEC MACRO M1113 14-JAN-82 16:15 PAGE 16% . 6 QUENCE 
©005 007632 001402 BEQ iS$ ;BRANCH IF NOT 
6006 007634 072427 000004 ASH 04 ,.R4 sPuUT CSR NUMBER IN INTERLEAVED CSR 5.9’ 
6007 007640 002626 158: BIS R4 , CONF IG(R2) ;PUT CSR NUMBER IN CONFIG. TABLE 
6008 007644 016004 002454 MOV CSRINFOCRO),R4 ;GET MEMORY TYPE 
6009 007650 042704 177770 BIC erc7,R4 sCLEAR OFF THE EXTRANEOUS BITS 
6010 007654 S RG sMOVE INTO PROPER POSITION 
6011 007656 002630 BIS te: atic sSET IT INTO THE COMFIG TABLE 
6012 7 022737 000001 002424 CMP ro Te S WAS THIS NON-INTERLEAVED MEMORY? 
6013 007670 001431 BEQ sBRANCH IF IT WAS 
6014 007672 052762 010000 002630 BIS ‘elti2. CONF IG-2(R2) 1SET THE INTERLEAVED B11 
6015 007700 010204 MOV R2,R4 1sSAVE THE CURRENT BANK INDE x 
6016 007702 032737 000001 002424 BIT eBrto, I sWAS THIS 126K INTERLEAVED? 
6017 007710 001006 BNE 5% ;BRANCH IF TRUE 
6018 007712 052762 004000 002630 BIS @6IT11,.CONF IG+-2(R2) ;SET 64K INTERLEAVED FLAG IN COMFIG 
6019 007720 062704 000020 ADO @20 ,.R4 ;SET NEW BANK POINTER TO 4 ee AME AL 
007724 BR 168% er OVER NEXT INSTRUCTI 
6021 007726 062704 000040 53: ADO @40 ,R4 ;SET NEW BANK POINTER 8 panes AHE AC 
6022 007732 052764 000040 002626 163: BIS @6I11TS,CONFIG(R4) sSET SKIP ECC LOGIC TESTS FLAG 
6023 007740 056264 002626 002626 BIS CONF IG(R2) , CONF IG(R4 ) iSET OTHER INFO INTO THAT BANK 
aa 007746 056264 002630 002630 BIS CONF IG+2(R2), CONF IG+2(R4) 
3; 
cant 3* THIS SECTION IS EXECUTED ONLY WHEN THE BANK-1 
34 
6028 007754 022737 001000 172350 24%: CMP #1000 ,KIPAR4 sIS THIS BANK 1 ? 
6029 007762 001402 BEG 30% sBRANCH IF TRUE 
60350 007764 000137 010314 Pp 33% sELSE APP TO END OF THIS BANK 
6031 007770 032737 100020 002406 5303: BIT @BITIS!SIT4, TEMP A SBE OR DBE? 
6032 007776 001417 BEQ 108 
6033 010000 013704 002406 MOV TEMP ,R4 
6034 010004 072427 177767 ASH @-9, ,R4 ;sMAKE ERROR ADORESS INTO BANK ¢ 
6035 010010 022704 000001 CMP @1,R4 sERROR IN BANKS O OR 1? 
6036 010014 003010 BGT 10% ;BRANCH IF NOT 
6037 010016 052762 000001 002626 BIS @BITO,.CONFIG(R2) :SET ERROR FLAG IN CONFIG TABLE 
6036 01 105262 002630 CONF IG-2(R2) s;ADO ONE TO BANK ERROR COUNT 
6039 010030 SET CONF GERROR :PRINT CONFIG TABLE 
6040 010036 053737 002626 105: 8Is CONF IG+4 CONFIG ;SET UP INFORMATION IN BANK ZERO 
6041 010044 053737 002634 002630 BIS CONF IG+6.CONFIG+2 
6042 010052 NOP ;sDEBUG AID 
6043 010054 022737 ©CO0001 002424 Cup “1.1 —y THIS NON-INTERLEAVED MEMORY 
010062 001 BNE 463 - BRANCH OVER NEXT STMT. 
6045 010064 000137 010454 PP 6% YES” - APP TO END OF THIS BANK 
6046 010070 012704 000020 46%: MOV #20 ,R4 sSET UP COUNTER FOR 64K INTERLEAVED 
6047 010074 032737 000001 002424 BIT @BrITo,! sWAS IT 126K INTERLEAVED? 
60486 010102 001402 BEG $ ;BRANCH IF NOT 
6049 010104 062704 000020 ADD @20 ,R4 iSET UP COUNTER FOR 128K INTERLEAVED 
6050 010110 053764 002626 265: BIS CONF IG, CONF IG(CR4 SET OTHER GANK WITH SAME INFORMATION 
6051 010116 053764 002630 002630 BIS CONF IG-2, CONF Te-2(R4) :;AS IN BANK O 
6052 010124 052764 002626 61s eerTs, CONF IG(R4 ) ;SET SKIP Ecc LOGIC TESTS FLAG 
6053 010132 000470 BR 33% ; BRANCH 
6054 ;@ 
6055 3¢ IF CHECKBITS DID NOT MATCH, WE COME HERE 
6056 i 
6057 010134 032737 100020 002144 22%: BIT OBITIS:BIT4,CSR ;SBE OR DBE FLAGS SET? 
6056 010142 001001 BNE 8% ;BRANCH IF TRUE 
6059 010144 BR 353% ;CHECK TO SEE IF IT IS MS11-™ 
6060 010146 013704 002146 8%: MOV CSRNO ,R4 ;GET CSRNO 
6061 010152 042764 000006 172100 BIC 06 , CSRADD(R4 ) ; TURN OFF DIAG CHECK € ECC DISABLE 


CZMSDDO MS11-./M DIAGNOSTIC 
MATCH ALi CSR'S WITH MEMORY 


302 
010310 


010314 


013737 


172100 
177773 
177600 
002426 


040000 
172100 
040000 
177037 


“MACRO 1115 


172100 
172100 


172350 
172352 


27st: 


28%: 


3538: 


338: 


66: 


E i a4 


14 -JAN-82 16:15 PAGE 163-3 
PUSH RO,R 
MOV CSAADO( RA), Ri 
ASH @-5,R 
BIC occi??. Ri 
Ts! NO22BIT 
BNE 27% 
BIS @BIT14,CSRADO( R4 ) 
MOV CSRADD(R4 ) RO 
BIC OBIT14, CSRADD(R4 ) 
BIC @'C740,R0 
ASL RO 
ASL RO 
ADO RO,R1 
MOV R1,R4 
POP R1,RO 
ASH R4 
CMP R4 , KIPAR4 
BNE 28% 
BR 35% 
CMP R4 , KIPARS 
BNE 
BIS eBITO,CONM IG(R2) 
INCB CONF IG-2(R2) 
SET 
re 25% 
& 


of GENCE 


:SAVE RO € Ri 
iGET CSR INFORMATION 
sSET UP ERROR ADDRESS 


:I1S THIS AN 11744 OP 11/24? 
sBRANCH IF NOT 

;GET EXTENDED ERROP ADORESS BITS 
sREAD FROM CSR 

; TURN OFF EUS BIT 

;SET UWP EXTENDED BITS 


;SET UP TOTAL ERROR ADDRESS 
;SAVE IN R4 
sRESTORE 20 € Ri 
;SET ERROR ADORESS UP IN PAR NOTATION 
;00ES IT tee KIPAR4? 
sBRANCH I ALSE 
Ss - Bd Ino oe Sew ss TABLE 


ABLE 
sYES - MARK INFO IN CONFIG TABLE 


; 
3¢ THIS SECTION SETS UP ALL THE POSSIBLE CONFIGURATIONS OF 


s¢ MS11-" MEMORY. 


one Sees Shenee ae? 
BIT @BIT2,. CSRINFOCRO) 
BEG 6$ 

Crp #1,I 

BLO 18% 

SUB #2, TESTADD+-2 
ADO @4000 . KIPARS 
JP AG 

CoP o4,1 

BEG 20% 

Ss @2,1I 

BLO 12s 

ADO 4000 ,KIPARS 
JP ai 

CMP o3.1 

BLO 6% 

ADO @2, TESTADO 
ADD @2,TESTADD+2 
SUB #4000 ,KIPARS 
aP 4% 

i¢ 

3@END OF BANK ROUTINE 
34 

CLRICSR 

ADO 04 ,R2 

ADD #1000 ,KIPAR4 
MOV KIPAR4 ,KIPARS 


sIS THIS MS11-M MEMORY? 
sNO - GO TO END OF BANK 


31S THIS 1ST TIME THROUGH? 
BRANCH IF NO 


1 NON-ASSERTED 
‘TRY TO MATCH AGAIN 
34TH TIME THROUGH? 
;YES - BRANCH 
32ND TIME THROUGH 
740 - BRANCH 
sTRY AS 128K INTERLEAVED 


;TRY TO = AGAIN 
ag TIME T 


BRANCH 
: TRY “TESTING THE BANK 
orm Al ASSERTED 

64K INTERLEAVED MEMORY 
‘TRY TO MATCH AGAIN 











;sCLEAR THE CSR UNDER T 

s UPDATE Saeeat vn caer POINTER 
sUPDATE KIPAR4 TO NEXT BANK 
;AND UPDATE KIPARS 


147 


rie 
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LEGANCE 14 
MATCH ALL CSR'S WITH MEMORY a = 8 


6119 010476 000240 NOP ;DEBUG AID 
6120 010500 023737 002532 172350 CMP LASTBLOCK ,KIPARG | ;MAVE WE DONE THE WHOLE MEMOR) SPACE? 
6121 010506 101402 BLOS 198 ;BRANCH IF DONE RC 
6122 010510 000137 007354 JMP 453 ; JUMP IF NOT DONE 
6123 019514 062700 000002 198: ADD @2,R0 ; INCREMENT CSR POINTER 
6124 010520 ¢ NOP :DEBUG AIO 
6125 010522 104423 CACHON ;TURN ON THE CACHE 
6126 019524 000137 007260 IMP 1s ; JUMP TO TRY NEXT CSR 
; 
6128 010530 062706 000004 1008: ADD 04, SP sRESTORE STACK Rec 
6129 010534 000157 010454 UMP 63 1GO TO END OF BANK ROUTINE src 


CZMSDD0O ™S11-./M DIAGNOSTIC 
MATCH ALL CSR‘'S WITH MEMORY 


010540 
010542 
010544 


010544 


010704 
010722 
0190724 
010726 
010730 


104425 
104472 


005037 
012757 
005037 


012737 


104506 
104472 


002070 


000001 


MACRO 1115 


002074 
002076 


bie 


14 JAN-62 16:15 PAGE 164 9EGUENCE 14% 
SUBAAS: CACHON sMAKE SURE THE CACHE IS ON 
ECCINIT sTRAP ON DOUBLE BIT ERRORS (NORMAL ) 
NEWTST <<TEST BANK © ACCESSES>> 


s*TEST 2 TEST BANK O ACCESSES 


§ FSSSSSSSSSESHESSSSSHEEESSHASSEEEEEESESESSEEEEEESESESESEEEEESEEEESCESEEEEEEEEEEEEEOE 


TST2: SCOPE 
s;THIS DOES A “TST” i ‘ie. ON EVERY LOCATION IN BANK @0 TO SEE 
;IF IT GETS ANY PARITY TRAPS. 
; SINCE EVERY LOCATION IS EITHER LOADED OR WRITTEN INTO Br TrE gaat 
;PRIOR TO ro POINT - THEN A PARITY ERROR IMPLIES THAT THERE IS A 
;HARDWARE FAILURE IN THE MEMORY 
i THESE ERRORS ARE COUNTED AND A FATAL ACTION IS TAKEN 
CLR PARCNT ;CLEAR PARITY ERROR COUNTER 
MOV @1,NOPAR ;SET THE NO PARITY ERROR FLAG 
CLR NEMCNT ;CLEAR NON-EXISTANT MEMORY ERROR COUN 
MOV @1,NONEM ;SET THE NON-EXISTAN’T MEMORY ERROR MOE TO COUNT 
SET4 @NONE XIST ;TRAPS TO 4 GOTO NONEXIST 
CLR RO 
MOV @SIZE .R1 
CACHOFF ;TURN CACHE OFF 
1%: oa gle ;SEE IF I CAN DO A READ ACCESS WITHOUT A PARITY TRAP 
Cc ; TURN CACHE ON 
;SEE IF ANY FAILURES 
TST PARCNT ;ANY PARITY ERRORS? 
BEG 2s sNO - SKIP 
FATAL 3 
es: TST NEMCNT sANY NON-EXISTANT MEMORY (HOLES)? 
BEG 38% ;SKIP IF EQUAL 
7 eee ;UPDATE iST ADDRESS FAILURE FROM AUTO INCREMENT o 
38: BIS CPUBIT.CONMFIG ;SET CORRECT ACCESSED SIT ON BANK C 
RESS ;RESET TRAPS TO 4 TO DEFAULT 
SUBTST <<«ENABLE ECC FOR CORRECT TRAPS>> 


J SSSSSSSSSSSSSSOSSSSSSSSESESESSSSSESSSSSHSHSSSSHEESSSESSESESHESSESESSEESESESESEESEEOEEESE 
; SUBTEST ECC FOR CORRECT TRAPS 
§ FOSSSSSSSSHSASSSSESSEESETOSESHSESSSESSHESSESSSSESSSSEHESHOSSESSESOSSESSEEHSSESEOESEHEEEE 
F @SWO SET.IN @SWR OR ACTFLAG IS TRUE 
EL Se sTRAP ON SINGLE BIT ERRORS 
ECCINIT ; TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
END ;OF IF @SwO 


ENABLE ECE FOR CORRECT FRABS 


©170 010730 


010730 


005037 
012737 
012737 
022737 


011566 


MACRO ©1113 


002074 
002076 


003720 
002474 
002476 
002474 
0024 76 


002100 


171350 


003720 


seTEST 3 
TSTS3: 


1%: 


TAGS$: 


WARNI: 


NEWTST 


SCOPE 
sEACH 


Hie 
14 JAN-82 16:15 PAGE 166 


a mNCE 


<<TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES>-» 


F FSSSSSSSSSSSESSESSESSESSESESESESESESSEEEESOSESESESEEESESSEESESEEEFEEEEEEEEHEEEEEEEERESEES 


TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES 


£ SSSSSSSSSSSSSSSSSSSSSESESSESEESASDHESHESESSESESESESSEEEEESEESEESEESEESEEEESEEEECEEEEEEE BESS 


BANK IS TESTED FOR EXISTANCE _ If IT ExISTs 


sTHEN IS IS TESTED FOR ZEROS & ONES 


sEXCEPT 


LR 


PROTECTED BANKS (WHERE THE PROGRAM IS) ARE ONL’ TESTED Br 


“TST” INSTRUCTIONS LIKE BANK 60 
SANY BAD BANKS ARE LOGGED IN THE CONFIGURATION 


i$ 
OMTST3S+4,LINKI 
OMTST3S+6,LINK2 
TAG9$ 


MTSTS 
@UIPAR2 ,LINK1 
@UIPARS ,L INK 
BANK 
LASTBANK , BANK 
TAG28 
_ Ri 
Ri 
Ri, BANK INDE x 
PATERR 
PARCNT 
NEMCNT 
BANK 
CONF IG(R1) 
TSTBANK 
9207, GLINKI 
OF IRST,RO 





RO,R4 
@SIZE ,R1 
R1,R3S 

R2 


A 
@1,PROTYP 


1% 

MTST3 

2s 
FASTCITY 
TAGS? 
GMa 


NOP AR 
SUBAAI 


TABLE. 
_— ee IS ONLY DOING A SMART SIZE - NOT ACTUAL TESTING! 


sSET NO PARITY ERROR FL 


iSET NON -EXISTANT MEMORY” MODE 10 ExIT TEST LOOP 


; TRAPS TO 4 GOTO NONEXIST 
;IS THIS AN 11/44? 
;BRANCH IF TRUE 

;SET UP LINKS 


;PUT IN FAST MEMORY 
sSET UP LINKS 


; DONE ? 
sYES - SKIP TO NEXT TEST 


;BANK « 4 


;sCLEAR PATTERN ERROR COUNTER 

;CLEAR PARITY ERROR COUNTER 

sCLEAR NON-EXISTANT MEMORY COUNTER (HOLES) 
sMAP SUPERVISOR SPACE (TEST AREA) TO BANK 

:IS THIS BANK PROTECTED? 

sYES - GO TEST BANK SPECIAL 

;PUT “RETURN” INSTRUCTION AFTER WRITE ROUTINE 


s;DATA IS ZEROS 
sTURN CACHE OFF 
;ENTER SUPERVISOR MODE 


:I1S THIS AN 11/744? 
;BRANCH IF TRUE 


:;CALL TO THE USER INSTRUCTION PAR‘S 
:;ENTER KERNEL MODE 

:TURN CACHE ON 

;SKIP NEXT INSTRUCTION 


sRESET TRAPS TO 4 TO DEFAULT 
s INDICATE DEFAULT PARITY ACTION 


-oreeee MS1i1-./M DIAGNOSTIC 
TEST BANKS 1-200 (OCTAL) FOR ZEROS € ONES 


6279 011534 


23 
012737 


052761 


002066 


171214 


002072 


; 


— 


Lc 
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MACPO M1115 
TAGS$: TST NEMCNT 
BEQ is 
BR TAG9$ 
18: CACHOF F 
TESTAREA 
CALL a INK? 
KERNEL 
CACHON 
TST PATERR 
2% 
TST PARCNT 
2s 
TST NEMCNT 
BNE 2s 
MOV oF IRST,RO 
MOV ,R4 
MOV @SIZE .R1 
MOV R1,RS 
MOV ONES ,R2 
171136 MOV €000240 , @L INK 
CACHOF F 
TESTAREA 
003720 CMP #1, PROTYP 
BEQ St 
CALi MTSTS 
BR $ 
53 CALL FASTCITY 
6%: KERNEL 
CACHON 
2s MOV BANK INDE x ,RO 
TST PATERR 
BNE 38 
TST PARCNT 
BNE 38 
TST NEMCNT 
BEQ 4% 
002626 53% at @BITO, CONF IG(RO) 
002626 4% BIS CPUBIT . CONF IG( RO) 
JP TAGSS 
sTEST A PROTECTED BANK 
TSTBANK : PUSH Ri 
002076 MOV @1,NONEM 
MOV oF IRST RO 
MOV . €20000, 
TESTAREA 
4%: TST CRO)- 
S08 Ri, 48 
KERNEL 
CACHON 
002076 MOV ~ ia aaa 
POP Ri 
IF PARCNT NE @0 
002626 BIS 


OB ITO, CONF IG(R1 ) 
SET  CONFGERROR 


;ANY TRAPS? 

3NO - SKIP 

iNOW - TRY NEXT BANK 

; TURN CACHE OFF 

sENTER SUPERVISOR MODE 
sF INISH PATTERN 

sENTER KERNEL MODE 

; TURN CACHE ON 

; ANY PATTERN ERRORS 


SKIP 
; ANY NON EXISTANT MEMORY 
s;YES - SeIP 


sDATA IS ONES 
eo BACK IN SUBROUTINE 


‘ENTER TEST MODE 





; ANY PATTERN ERRORS? 
;YES - SKIP 
,; ANY parity ERRORS? 


SKIP 
:SET ERROR BIT IN THIS 
sFORCE PRINTING 
:SET ACCESSED BIT 


sSET NON-EXISTANT MEMORY TO COUNT 


sTURN CACHE 
SENTER TEST MODE 


;ENTER KERNEL MODE 
; TURN 


CACHE ON 
sRESET NON-EXISTANT MEMORY TO EXIT TEST LOOP 


;ERROR BANK 


BANK 
OF CONFIGURATION TABLE 


Jle 


CZMSDDO MS11 L/M DIAGNOSTIC MACRO M1113 14-JAN-82 16:15 PAGE 166-2 SEQUENCE 152 
Ts TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES , 

6280 011542 END ;OF IF PARCNT 

6281 011542 IF NEMCNT EQ 00 

6282 011550 053761 002104 002626 BIS  CPUBIT,CONFIG(R1) sACCESSED BANK 

6283 011556 END ;OF IF NEMCNT 

6284 011556 000137 011030 JMP TAGS 

6285 011562 010220 MTST3: MOV R2,(RO)- ;V177640 

6286 011564 077102 508 R1,.MTST3 :V177642 

6287 011566 000240 NOP +V177644 

6288 011570 012401 23: MOV (R4)+,R1 3V177646 

6289 011572 020102 CMP R1,R2 ;V177650 

6290 011574 001402 BEQ 35 ;V177652 

6291 011576 005237 002072 INC PATERR ;V177654 

6292 011602 077306 3s: 508 R3,28 ;V177660 

6292 011604 000207 RE TURN ;V177662 


CZMSODO 
TS 


MS11-./M DIAGNOSTIC 
TEST BANKS 1-200 (OCTAL) FOR ZEROS € 


011606 


011714 


005237 


023737 
002336 
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ONES 


002100 


002100 
002626 


002100 


Kile 


SEQUENCE 157 


SUBAAI: SUBTST <<FIND SHADOW INHIBIT MODE POINTERS>> 
j POPOSSSESEREEEEEEEEESEEEESEEEEOEEEEEOEEEEEOEEEEESEOEOOOESOEEEEEEEORED OE EEEEEEES 
3 *SUBTEST FIND SHADOW INHIBIT MODE POINTERS 
§ POOSEOESEESEEEEEEESEEEEEEEEEEESESEEEEDOSESEFESEESEEEEEESEEOEEEOEEEEEOEEOESOEEEOS 
3* THIS SECTION LOOKS FOR INTERLEAVED MS11-M MEMORIES AND FIGURES OuT 
;¢ WHERE THE SHADOW INHIBIT MODE POINTERS ARE LOCATED. THESE AREAS 
;@ ARE THEN MARKED AS PROGRAM SPACE. 
BANK sRESET BANK TO ZERO 


CLR 
SHADL 1: — EXBANK ;SET BANK PARAMETERS 


BANK INDE x ,RO 
IF ACFLAG IS TRUE AND INTFLAG IS TRUE 
IF INT64K IS TRUE 


ADD #20,R0 sPOINT TO ee ty + 4 
‘ - #10,B6ANK ;sPOINT TO BANK - 
L 
ADO #40,R2 ;sPOINT TO BANKINDEX + 8 
ADD #20, sPOINT TO BANK «+ 16 
END; OF IF 
iy eBIT7, CONF IGCRO) ;MAKE NEW BANK PROGRAM SPACE 
INC ;GO TO NEXT BANK 
END; OF IF ACFLAG 
CMP LAS TBANK , BANK sHAVE WE DONE ALL THE BANKS? 
BGE 1 ;BRANCH IF NOT 


CZMSDDO0 


©6318 


MS11-L/™ 
FIND SHADOW INHI 


011716 


011716 


000004 


104424 
012737 


012701 
004737 
013700 


012703 
012737 


012705 
116002 
we 


006 
042702 
010237 


013737 
052760 
004737 


DIAGNOST 
It MODE 


Ic 
POINT 


177777 


060000 
044302 
002102 


177741 
002146 


002146 
000100 
012224 


002152 


002234 


002152 
002626 


MACRO M1113 14 
ERS 


Lie 
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NEWTST <<ECC INHIBIT MODE POINTER TEST>> 


SE GUA 


NCE 


4 FSSSSSSSSSESEESSESHESSESESESEESESSESEOSEESEESEHESEEESEEEESEEEEEEEEEESEEEEEEEECEEEEEEEOEEESE 


; TEST 4 


ECC INHIBIT MODE POINTER TEST 


J SSSSSSSESSSSSSESESHESSESHESESSESSESEEEESEEEEEEEESESE*ESOEOSEEEEEESESEEERESESEEEEEEEEEEEEE 


TST4: 


SCOPE 

3 THE MS11-M OR MF11S-K INHIBIT ECC DISABLE AND DIAGNOSTIC CHECK MODE 
;ON THE BOTTOM FIRST OR SECOND 16K WORDS CONTROLLED BY A CSR. 

sIS CONSIDERED 10 BE A_ PROTECTED BANK B8Y THE PROGRAM. IT MAY BE 
;QUITE COMPLEX TO DETERMINE ON A GIVEN SYSTEM CONFIGURATION WHICH 
sBANKS CAN BE PROTECTED; 


:S0 

i THIS ROUTINE ATTEMPS TO CREATE A DOUBLE BIT ERROR IN ADORESS 0 & 2 
;OF EVERY ECC BANK. ECC HARDWARE WILL PREVENT THIS FROM HAPPENING 
ee PROTECTED BANKS WHICH SHOULD ALWAYS INCLUDE BANK ZERO - WHERE 
3 PROGR 


FAILURE IT IS COMMON THAT A DOUBLE BIT ERROR 
THE KERNEL STACK € “CRASH” THE DOIAGNOSTIC 
YOUR ONLY CLUE IS THAT YOU CAN GET AS FAR AS 

; THIS ROUTINE BUT NOT PAST IT! 

ACHOF F ;TURN CACHE OFF 


C 

MOV @-1,OLDCSR 

FOR BANK := #0 TO LASTBANK 
oF IR 


ST,R1 ;SET UP VIRT ADDR POINTER 


IS FALSE 
IF INTFLAG IS TRUE 
MOV 


#40000 ,R3 
- MOV #1,SPLTCSR 
ELSE 
MOV 62,R3 
OF IF INTFLAG 
gutted ies 


@tC36,R2 


» CSRNO 
IF CSRNO NE OLOCSR 
MOV Cc OLOCSR 
IF PFLAG IS F 


FALSE 
BIS eBlte, CONF IG(RO) 
END; OF IF PFLAG 
CALL IMPTEST 


;SET INDEX COUNTER 
;MAP AS INTERLEAVED BANK 


;SET INDEX COUNTER 


* 


ra 
** 


6ZMSODO 


Eee INMIB 


012074 


005037 
104506 
104472 


104423 
000137 


Tae ee ee ee ree 8 


002627 
177775 
177741 
002146 


000002 
012224 
002254 


002100 


012466 


M | rs 


SEQUENCE 8155 


IF INTFLAG IS TRUE 
MOVES CONFIG+1(RO),R2 
ASH @-3,R2 
BIC atc36, Re 
MOV R2,CSRNO 
ADD 2,R1 sFIX POINTER FOR Al ASSERTED HALF 
CALL IMPTEST 


CLR SPLTCSR 
ENO; OF IF INTFLAG 
F CSRNO 


MAP sMAP TEST SPACE TO BANK O 
CLR 


BANK 
IF @SWO SET.IN @SWR OR ACTFLAG IS TRUE 
ENAS®E ;TRAP ON SINGLE BIT ERRORS 


LSE 
CCINIT ; TRAP ON DOUBLE BIT ERRORS (NORMAL ) 


E 
END; OF IF @Swo 
CACHON ;TURN THE CACHE BACK ON 
JMP SUBAAR ;JUMP OVER THE SUBROUTINE 


MS11-L/M DIAGNOSTIC 
ECC INHIBIT MODE POINTER TEST 


012224 


005004 


005005 
012757 


020000 


020000 
002556 
002556 


027400 


074000 


MACRO M1115 


002144 


002144 


002144 


002144 


Nie 
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IMPTEST:CLR R4 
MAP BANK 
CLR 


RS 
MOV ©6IT13,CSR 
TESTAREA 


SEQUENCE 156 


sMAP SUPERVISOR SPACE (TEST AREA) TO BANK 


sENTER TEST MODE 
;SAVE TEST LOCATION 
; INDEX TO NEXT LOCATION 
;SAVE TEST LOCATION 
sDOISABLE ECC € WRITE CHECKBITS FOR 1 CSR 
sWRITE CHECKBITS (ALL ZEROS) 


;CLEAR CSR 
;READ CORES TS INTO REAL CSR 
sWAS THERE A DOUBLE BIT ERROR 


;THIS MAKES SURE THAT SBE‘S DON'T LOOK LIKE PROTECTED AREAS 


33 
€74000,CSR 
R4,(R1) 
ADO R3,R1 
R4,(R1) 


R3,R1 
TST (R1) 


WAS 10BE 
END ;OF ON.NOERROR ;53 


Vv R4,(R1) 
R3,R1 


. 


sDISABLe ECC € WRITE CHECKBITS FOR 1 CSR 


;CLEAR CSR 
;WAS THERE A DOUBLE BIT ERROR 


;DISABLE ECC € WRITE CHECKBITS FOR 1 CSR 
;ADD INDEX TO GET TO SECOND WORD 
;SUBTRACT INDEX TO FIRST WORD 

;CLEAR CSR 


;WAS THERE A DOUBLE BIT ERROR 


DISABLE ECC & WRITE CHECKBITS FOR 1 CSR 
INDEX TO SECOND WORD 
,GO BACK'TO FIRST WORD 

;WAS THERE A DOUBLE BIT ERROR 


sIDENTIFY AS BAD BANK 


sOISABLE an CORRECTION 
; CLEAR ouT DOUBLE BIT ERROR! 
; INDEX TO SECOND WORD © 


1z 
7d 
S11 i. /™ OITAGNOSTIC MACRO ML1i® 14 JAN-82 16:15 PAGE 171-1 SEG Ne 
ECC INHIBIT MODE POINTER TES’ 


012432 010411 MOV R4,(R1) sCLEAR GuT DOUBLE BIT ERP UM! 


012436 005705 Ts? RS 

017440 001405 BEG is 

012442 050560 002626 BIS RS . CONF IG( RO) 

012446 105260 002650 INCB CONF IG+2( RO) 

012452 104036 ERROR +36 

012454 18: POP (Ri) sRESTORE TEST LOCATION (2ND WORD, 
012456 160501 SUB R3,R1 sGO BACK TO FIRST WORD 

012460 PoP (RL) sRESTORE TEST LOCATION (iS! wORD) 


= 
GIS 
CZMSDDO MSIL i. -™ DIAGNOSTIC MACRO M1115 14 JAN-82 16:15 PAGE 177 ADANTE 
74 ECC INMIBI’ MODE POINTER TEST 


»799 0124666 SUBGAR: SET STOPOK -sPROGRAM CAN NOW BE HAL TED 


& a 
if a 
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012474 


SUBTST 


<<LEGAL CONFIGURATION CHECK>> 


»*SuUBTEST 


12606 
012612 042760 014000 002650 
012620 


006 304 
012644 005263 002454 


6860 012650 005264 002434 


0127350 005037 0131536 
012734 022761 000010 002434 23: 
002045 


012744 022761 000020 002434 
002005 


LEGAL CONFIGURATION CHECK 


MOV @1 ** 
“OV OCSRINFO,R1 
ciR (Ri )- 
S08 RO,1% 


FOR BANK := @0 TO LASTBANK 
CALL E XBANK 
MOV BANK INDEX, RO 
IF ACFLAG IS TRUE 
“OvVB 


BURIeEEe 


CONF IG+1(RO),R3 
BIC @?C17,R3 ° 
ASL RS 
INC CSRINFOCRS) 


IF MKFLAG IS TRUE 

sMAKE SURE THAT EACH BANK HAS NO MORE THAN 2 CSRS 

BEGIN LEGALCSR 

IF INTFLAG IS TRUE 
MOVB CONF IG+1(RO),RS 

MOV RS, 

BIC @'C17,R3 

ASH @-4,R4 

BIC @'C1i7,R4 

IF RS EG R4 
BIC @BIT11!81T12, CONF IG-2(RO) 

017 ONF IG(RO ) 


Ra 
INC CSRINFOCRS) 


:@ OF CSR'S IS WRONG 


sSAVE CONTENTS OF R5, RO 
:CLEAR REGISTERS 





MBERR sCLEAR ERROR INDICATOR 
#10, CSRINFOCR1 ) 11S CURRENT CSR <* 10 
et s;BRANCH IF SO 

#20, CSRINFOCR1) :IS CURRENT CSR < 20 
38 s;BRANCH IF SO 


CZMSODO MS1i-L-M DIAGNOSTIC 
LEGAL CONFIGURATION CHECK 


015260 


002626 
000002 


170377 
177771 


010000 


002530 


013140 
000902 


010000 
013140 
000004 


013140 
013140 
013140 
013140 
01314C 
000001 


MACRO 


0026530 
013136 


000070 


013140 


Mil15 


5s: 


S$: 


6$: 


2%: 


38: 


4%: 
S$: 


bogs S66 °5R- 


b+ 
shutetn 


oC 
~ 


at ttt tt bal tt | 


ah 
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ILLCsSR 
Ss 


CONF IG(RO).RS 
_ 


a 

@*C 7400 RS 

@-7,85 

ae” Ri 

eerti2, CONF IG+2( RO) 


e. MBERR 


2RO 
Ser eee See) 
@4 ,RO 
6% 
RO 


RO 
RO.LAS TBANK 
SKUJ 


RO 

PHEBE 

dle « CONF IGCRO ) 
@6IT12, CONF IG+2(RO) 


SE GUENCTE ‘4 


;CALi ERROR ROUTINE 
;TRY NEXT CSR 

sMOVE OW WORD TO RS 

;D0ES MEMORY EXIST HERE? 
;BRANCH IF NOT 

; ISOLATE CSR NUMBER IN 
sREGISTER 5 

:IS IT THE CURRENT CSR? 

; TRY NEXT OF COM IG IF NO’ 


WORD 
sIS IT INTERLEAVED? 
BR IF SO 





sERRORS FOUND? 

;TRY MEXT CSR IF NOT 

;CALL ERROR ROUTINE 

er eo y CONFIG COUNTER 








sR-C 
<e: 
;BRANCH IF SO R-C 
‘TRY NEXT LOWER ENTRY IN CONFIG TABLE 3R-C 
. 
3R-C 
sOIVIDE INDEX BY 4 TO GET BANK 9@;R-C 
;STORE IN LASTBANK 3R-C 
;SAVE SPACE FOR ERROR INDICATOR 
sSAVE SPACE F ODD BOUNDARY INTERLEAVED INDICATOR 


oF 
sCLEAR CONFIG COUNTER 
s;CLEAR COUNTER 
:IS TMERE MEMORY PRESENT? 
:BRANCH IF NOT 
31S IT INTERLEAVED? 
sBRANCH IF 
y INCREMENT COUNTE 
3 INCREMENT CorIG. COUNTER 
t TRY NEXT 


:IS THE COUNTER EQUAL TO. 
;ONE OF THE SPECIAL VALUES. 
LIF 8 ae B 


:BRANCH TO 4$ 















sCLEAR INDICATOR 
;SET INDICATOR 


SUBAAP sBRANCH TO NEXT SUBTEST 


CZMSODO MS11-./M DIAGNOSTIC 
LEGAL CONFIGURATION CHECK 


010102 
006202 
022702 

00002 


000012 
00000 7 


000060 
075377 


MACRO M1115 


ris 
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sRe HAS CSR NUMBER 
sMAKE ACCEPTABLE FOR PRINTING 


sPUT NUMBER INTO ERROM MESSAGE 


6952 


CZMSODO MS11-./M DIAGNOSTIC 
LEGAL CONFIGURATION CHECK 


013322 


013702 
006 302 
006302 


002550 


MACRO M1113 


002424 


SUBAAP : 


SUBTST 


3; *SUBTEST 


CLEAR 


FOR Ri 


” 
oe 


5] 4 
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<«<PRINT CONFIGURATION DETAILS>>» 


§ FSSSSSSSSSSESSESSSSESSESSSSESSESEESSESESESESEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE 


PRINT CONFIGURATION DETAILS 


§ SSSSSSSSHSSSSHSSSESSSESSSESESESSESESEESESEEEEEEOEEEEDREEEEEEEEEEEEEEEHEEEEHEEEHEHEREOEES 


BSIZE, —— MSIZE ,PSIZE 


LAS TBANK , PR 
R2 


#0 TO R2 


Y o4 


8 
IF CPUBIT SET.IN CONF IG(R1) 
IF oy" aalt SET.IN CONF IG-+2(R1) 
F OBITS SET.IN CONF IG+2(R1) 
IF @BIT9 SET.IN CONFIG-2(R1) 
LET PSIZE := PSIZE + @1 


‘Sie. :* KSIZE + 1 


ELSE 


LET 
END; IF BIT9 


ELSE 
IF @BIT9 SET.IN CONF IG+2(R1) 
. yy LSIZE := LSIZE + @1 


LET ae OR :* MSIZE + @1 


END; IF BIT 
END; IF BITS 


SE 
IF gE SET. Pe CONF IG+2(R1 ) 
@BITS SET eg Aaa oa 


IF CPUBIT 
END ;OF FOR ALL BANKS IN TABLE 


CLR I 
FOR Ri :* #0 TO #10 Br e2 
ASL S8SIZECR1) 





FOR Rl :* @0 TO 





@200 BY 
If CPUBIT SET.IN CONF IGCR: ) 


ai" UNITOP :+ UNITOP 
, aA CPUBIT 


CND; oe ee FOR Ri 
ASL UNI TOP 
ASL UNI TOP 
ASL UNI TOP 
ASL UNI 

IF I wT 

TYPE 

TST BSIZE 
BEG is 
TYPDEC 68SIZE 
TYPE MSGO71 


> 61 


TOP 


TOP ;UNI 
UNITOP THEN LET I :* UNIT TOP 
sCRLF 


sOSIZECRI) 
sI «- I + BSIZECR1) 


:* UNITOP « 16. 


3° ae e 16. 


 QGJENTE 


BRINY CONF LGURATION DETAILS 


0135674 


014016 
014022 


005757 
001405 


005737 
001405 


005737 
001405 


005737 
001405 


004737 


002550 


002352 


002354 


0023556 


036632 


MACRO 1115 


L$: 


2s: 


38: 


4%: 


58: 


14 


JAN 82 


> 


2% 


16:15 PAGE 


7 


MSGO70 
If @SW6 OFF .IN @SwR 


CALL 


PCONF IG 


END; OF IF @SW6 


181 1 


Ao ANCE 


CZMSOD0 MS11 ./™ DIAGNOSTIC 
PRINT CONFIGURATION DETAILS 


7029 014022 


014212 


i 
163701 
010137 


060137 
060157 
062700 


104046 


002406 
063126 


177400 
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| 
; 


SUBTST <<CHECK APT SIZING>»> 
§F SSSSSHSSSSSHSSSSSSSESSESESESSSSSESEESESESEEEHSESEHEEEEOOEEEEEEEEEEEEEEEEEEOEEEEEHEEEEEEEEE 
3; SUBTEST CHECK APT SIZING 
§ SFSCSSSSSSESSSSSSSSESSSESSSESSSSSSSSSSESSSSESESSSESCEEEESEEESEHESEESEEESEEEEHEHEEEHOEOSEEEEE 
IF APTFLAG IS TRUE AND APTSIZE IS TRUE 
CLR TEMP 
Cy @sMAMsS1 ,RO 
FOR R2 :* 00 TO @4 
IFB 1(RO) NE 00 


MOVE CRO),Ri 
BIC 0177400,R1 
TF 2(RO) LT a0 

SEC 


ELSE 

ciLCc 
END ;OF IF 2¢RO) 
ROL Ri 


;TO COMPENSATE FOR 4 BANKS BEING (0 2) 





OR R2 
IF APTPAR NE LSIZE OR APTECC NE MSIZE 
ERROR 
END ;OF IF APTPAR 
END OF IF APTFLAG 





SE GUENCE 


144 


CZMSDDO MS1i-./™ DIAGNOSTIC 
CHECK APT SIZING 


7075 


014212 


014212 


014332 


004737 


014612 


024234 
002106 
014612 


024720 


MACRO M1113 


J15 


14-JAN-82 16:15 PAGE 184 SE GENCE 


LOOP ; NEWTST <<DIAGNOSTIC MODE DISPATCH ROUTINE>> 


§ SSSSSSSESSSSSHESSESSSESESSEESESESESEEESEESEEEEEESEEESEEEEEEEEEEEEEESEEEEOEEHEEEEEEE 


seTEST 5S DIAGNOSTIC MODE DISPATCH ROUTINE 


£ SSSSSSSSSSSESSESESSESSSSSESESEESESESSESEOHESESSESEESEEEEEEEEOEEEAESEEEEEESEEEEEHEEEEHEEESE 


SCOPE 


TSTSs: 
CONTFLAG 







BSWR ,RO sGET SWITCHES 

#tC16,R0 sMASK TO ONLY MODE BITS 

SOISPTBL CRO) iDISPATCH TO ROUTINE THROUGH NEXT TABLE 
MEMDONE sGO TO NEXT TEST 


DISPTBL : 0; BANKS FORWARD. PATTERNS Ff ORWARD 
1;BANKS FORWARD, PATTERNS REVERSE 
2;:BANKS WORST FIRST, PATTERNS FORWARD 
3;GANKS WORST FIRST, PATTERNS REVERSE 
4, PATTERNS FORWARD, BANKS FORWARD 
ORWARO, BANKS WORST FIRST 
SE. BANKS FORWARD 
7;PATTERNS REVERSE, BANKS WORST FIRST 
MEMDONE : DOBACK ;CHECK BACKGROUND PATTERN 
NEWTST<<UNIQUE BANK TEST>> 
§ FSSSSSSSSSSESSESSSSSESSESSESSSSESSSSESESSESEHESESSESOSSHEHSESESEESEESSEEEEESEEESEOEEEBESE 
;eTEST 6 UNIQUE BANK TEST 
§ SSSSSSSSSSSSESSSSSESESSSESESSESHSSHSSESESESESSEEESEESESESESESEEESSESESESESSSESESESEEESESEEEEE 
TST6: SCOPE 
;sMAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA 


SWRITE AND READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM IS) 


If SELOMLY IS FALSE 
SET MuT 
CALL MTOO27 
SET  WEADER 


cR MutT 
END ;OF IF SELON Y 
CALL DOBACK sRESTORE BACKROUND PATTERN 
FLUSM: SUBTST <<FLUSH OUT DBE‘S>> 


§ FSSSSSSSSSSESSESESESESSSESSSESSSESESHSSEESSHESHESSOSSESSSEESSESESSEESSESESSEEEESEEEEEESEOEEDE 


;@SUBTEST FLUSH OUT OBE'S 


§ SSSSSSSHSSSHSSSESSSSESSSESAHESSSESSESESSSESSESESSOESSESESESSESSESEHESEEESEEEEEEEEEHHEEEEOEEES 


CALL MTOOSO 


a*s/ 


045170 


MACRO M1115 


002014 
063104 


172516 


063106 


14-JAN-82 16:15 PAGE 186 


sE QUENCE 


-SBTTL END OF PASS ROUTINE 
j PROPOSE SESESESOEEEEESEOEESEEEOOEESEEEEEEOEEESOEESEOEEEEEEEEEEEEEEOEEOEESESEOEESS 
;*INCREMENT THE PASS NUMBER ( S$PASS) 
:*INDICATE END-OF -PROGRAM AFTER EACH PASSES THRU THE PROGRAM 
;*TYPE “END PASS @XXXXX” (WHERE XxXxXxxX IS A DECIMAL NUMBER) 


;¢IF THERES A “ae GO TO IT 
;¢IF THERE ISN'T in. TO LOOP 


sEOP: CLR FS AG 
MOV OCONF IG+2,R0 
18: BIC oB1T13,(RO) 
ADD 04 .,.RO 
CMP RO, ©3620 
BLE is 
MOV SERTTL ,.LASTERROR 
arc sPASS 


#100000, $PASS 
77 


TYPE MSGO 
IF a: SET.IN @SWR OR QVFLAG 
TYPE M™SGO 









35 
CLR LAG 
END ;OF IF SwWil 
TYPDEC sPASS 
MOV 42,R0 
BEG sSDOAGAIN 
$ZAP42: CMP @STACK ,RO 
BEG 
;WE ARE 
PUSH 
CALL SHUTUP 
POP RO 
RESET 
SENDAD: CALL CRO) 
NOP 
NOP 
NOP 
SDOAGN: ; UNDO SHUTUP STUFF 
$ RESTORE STACK 
: ENERGIZE 
; ENERGIZE MEMORY 
$ PUT LOADERS BACK 
MOV KSTACK SP 
TST NO22BIT 
BNE is 
BIS SBITS!BIT4, MARS 
is: ENERGIZE 
MOV L RO 
MOV #1,R1 
CALL 
IF APTFLAG IS TRUE 
IF suUSWR EQ SPASS 
APT MOV #50,R1 
2t: 2s 
ADD #1,8DEVCT 
ADC SUNIT 
SOB R1.28 
INC s8PASS 


sMOVE 2ND WORD OF CONFIG TO RO 
;CLEAR BACKGROUND VALID BIT 

s INCREMENT TO NEXT BANK 

; DONE ? 

;NO - BRANCH 


a 2. THE PASS NUMBER 


L . NUMBER 
Oo PASS @” 
IS TRUE 
3; QV 


3;GET MONITOR ADDRESS 

;;BRANCH IF NO MONITOR 

s;ARE WE UNDER RT11 
BRANCH 


sDOAGAIN VES - 
— (HEAVEN HELP US) XXDP! 


;;CLEAR THE WORLD 
3:GO TO MONITOR 
$3 ROOM 

33F OR 

ssACTL1L 


UNIBUS MAP € 22 a ADDRESSING 
MANAGEMENT 


sIS THIS AN 11/44 OR 11/24? 


sTURN ON MEMORY MANAGEMENT 
sDESTINATION BANK 
;SOURCE BANK 


°64 


CZMSDDO MS11-./M DIAGNOSTIC 
END OF PASS ROUTINE 


7167 014606 
7168 014606 
7169 014606 000157 014212 


ee 
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END ;OF IF sUSWR 
END ;OF IF APTFLAG 
Loor 


SDOAGAIN: UMP ;RE TURN 


5E QUENCE 


167 


M1Ss 


CZMSDDO MS11-./M DIAGNOSTIC MACRO M1113 14-JAN-82 16:15 PAGE 188 SEQUENCE 162 
END OF PASS ROUTINE 
7172 014612 DOBACK: SUBTST <<WRITE BACKGROUND PATTERNS>> 
j POOOOOHOSEEESESOEEEEEEEEESEESEEEEEEEEEEEEESEEEEEEEEEEEEEEESEEEEOEOEEOOEEEEEOEES 
; *SUBTEST WRITE BACKGROUND PATTERNS 
j COOOSERERESEEEEEEESEAEEEESOEEEEEEEEOEEEEOEEEEEEEEEEEEEEDEEEEEERESEEEEEEEOEEEEEES 
7173 014612 005037 002110 CLR PATTERN 
7174 014616 FOR BANK ;:* #0 TO LASTBANK 
7175 014622 004737 044302 CALL EXBANK 
7176 014626 IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
7177 014642 SET HEADER , MUT 
7178 014656 004737 017520 CALL MKTEST sCALL MJTEST WOULD ALSO WORK 
7179 014662 005037 002106 CLR MUT 
7180 014666 SET HEADER 
7181 014674 END ;OF IF ACFLAG 
7182 014674 END ;OF FOR BANK 
7183 014710 000207 RETURN 


CZMSDDO MS11-L/M DIAGNOSTIC 
MODE S 


MTEST 


7186 
7187 
7188 


014712 


014712 
014716 


014742 


014746 
014752 


002100 


044302 
002114 


002122 
002110 
016212 
044770 


002216 
045014 


002124 
042550 


014712 
043420 


MACRO M1115 


BAF PAF : 
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N13 


.SBTTL MTEST MODES 


SUBTST <<BANKS FORWARD ,PATTERNS FORWARD *oRECURSIVEss>> 


§ SSSSSSESSESSESESSESESESSESEEEESESESESESESEEEEEEEEEESEEEEEOEEEEEEEEEEEEEEEHEEEEEEEOEEEESEOE 


; «SUBTEST 


18: 


BANKS FORWARD ,PATTERNS FORWARD **RECURSIVE se 
FS SSSSSSSSESSESSESSESSESSEEHESSEESEHEOEESESESOEEEEEEALESEEESEEREEEEEEREEEEEEEEEOOEEEEEEOE 
CLR BANK ;SET BANK TO O 
;START OF BANK LOOP 
CALL EXBANK s;EXAMINE BANK 
TST ACFLAG ;CAN WE ACCESS THIS BANK? 
BEQ 43 sNO - GO TO BANK LOOP TERMINATION 
TST RRFLAG ;RELOCATION REQUIRED? 
BNE 43 ; YES ANK LOOP TERMINATION 


2s: 


4$: 


5%: 


GO 10 B 

CLR PATTERN iSET PATTERN TO 0 
;START = PATTERN LOOP 

CALL MTEST :GO TEST CORRECT MEMORY 
; TERMINATION OF PATTERN LOOP 
CALL INCPAT ;GO SEE IF THIS IS THE LAST PATTERN 
BNE es ;NO - LOOP ON THIS PATTERN 
; TERMINATION a LOOP 


CLR CONTF 

CALL INCBNK :;NEXT HIGHER BANK 

BGE o 1% :IF NOT DONE - LOOP ON THIS BANK 
3 L 

TST RLFL sHAVE WE BEEN RELOCATED? 
BE S$ sNO - SKIP 

RET sYES - RET 

CALL RELOCA sMOVE € MAP PROGRAM 
ON.ERROR THEN sSRETURN 

3; *@NOTEse — CALL 

CALL BAFPAF ;sCALL SELF 

Soha UNRELOCATE S UNMOVE E UNMAP PROGRAM 


SEQUENCE 


169 


2 


i) 
if A 
MACRO MLIIS 14 JAN-82 16:15 PAGE 192 
oe eRECURSI VE eo 


‘* 


CZMSODO MS11 ./™ DIAGNOSTI”. 
BANKS * ORWARD PATTERNS * 0 .wARD 


are Bm, 








7218 015020 BAFPAR: SUBTST <«<*BANKS FORWARD,PATITERNS REVERSE eeRECUR I vEee-- 
§ SSSSSSSSSSSSSSSSSSSSESSSSSSSSSSSSSSSSESSESSSESSESSSEESESESEESESESEEECEEEEESECHEE EEE EEES 
3; @SUBTEST FORWARD PATTERNS REVERSE eoREC RSI vE es 
FSSSSSSSSSSSSSSSHSSSSSSSSSEHSSSSSSESSESSSSESSSSSESESESESESSEESSESEEEEEESEEEEEEEEEHEESEEEE 

7219 015020 005037 002100 CLR BANOS ;SET BANK TO O 

7220 ;START OF BANK OOF 

7221 015024 006737 044302 18: CALL € XB ANK ;EXAMINE BANK 

7222 0150380 005737 002114 TsT ACFLAG ;CAN WE ACCESS THIS BANK? 

7225 015034 001412 8tQ ag sNO - GO TO BANK LOOP TERMINATION 

7224 015036 005737 002122 TST RAF LAG sRELOCATION REQUIRED? 

7225 015042 001007 BNE 4% sYES - GO TO LOOP TERMINATION 

"226 0150464 004737 0465004 CALL SETPAT ;SET HIGH PATTERN FOR CORRECT MEMORY 

1227 ;START OF PATTERN LOOP 

7228 015050 004737 016212 2s: CALL MTEST :GO TEST CORRECT MEMORY 

7229 3; TERMINATION OF PATTERN LOOP 

7230 015054 005537 002110 DEC PATTERN sIS THIS THE LAST PATTERN? 

7231 015060 100373 BPL 2s 3NO - LOOP ON THIS PATTERN 

7232 ; TERMINATION OF BANK OOP 

7233 015062 005037 002216 4s: C.R CONTFLAG 

7234 015066 006737 045014 ;NEXT HIGHER BANK 

so 015072 002354 ;IF NOT DONE - LOOP ON THIS BANK 

2 

7237 015074 005737 002124 sMAVE WE BEEN RELOCATED? 

7238 015100 001401 ;NO - SKIP 

7239 015102 7 ;YES - RETURN 

7240 015104 004737 042550 S$: :MOVE £ MAP PROGRAM 

7241 015110 

7242 

7243 015114 004737 015020 sCALi SELF 

7244 015120 004737 045420 3 UNMOVE UNMAP PROGRAM 

7245 015124 000207 





CZMSD00 
BANS 


MS1i 


* ORWARD .PATT 


015170 
015174 


015176 
015202 
015206 


015126 
043420 


MACRO M1115 
eeRECURSI 


BAWAF: SUBTST 


14 JAN-@2 16:15 PAGE 
VE ee 


\au * 


i194 


i4 


«<BANKS WORST FIRST,PATTERNS FORWARD 


t VANCE 


eeRECURS! VEee>- 


F PSSSSSSSSSSSESSSSESSSESSSSSSSSESSESSESSESSESESSESEEESESEEEEEEEEEEEOEEEEEEEEHEEEREEEEE 


3; @SUBTEST 


BANKS WORST FIRST ,PATTERNS FORWARD 


eeRECURSI VE ee 


18: 


2s: 


4%: 


S$: 


6%: 


CLR 

sSTART OF BANK LOOP 
CALL € XBANK 

TSt ACFLAG 

BEG 4% 

TST BMF LAG 

BEG a3 

TST RRFLAG 

BNE 43 

CLR PATTERN 
sSTART OF PATTERN LOOP 
CALL MTEST 


:;SET BANK TO 0 


;EXAMINE BANK 

;CAN WE ACCESS THIS BANK? 

sNO - GO TO BANK LOOP TERMINATION 
VIS THIS BAD MEMORY (WORST FIRST)? 
sNO - GO TO BANK a a TERMINATION 
;RELOCATION REQUIRE 

sYES - GO TO BANK 

iSET PATTERN To 0 


sGO TEST CORRECT MEMORY 


LOOP TERMINATION 


ae r. PATTERN LOOP 
CAL INCPAT 


BNE 2s 
tater! 2 OF BANK LOOP 


CL CONTFLAG 
CALL INCBNK 
BGE is 
sEND OF LOOPS 
c > abi 

$ 
s@@NOTE*se RECURSIVE CALL 
c ar 
RET 
TST RLFLAG 
BEG 68 
RET 
CALL RELOCATE 


BAWP AF 
CALL UNREL OCATE 
RE TURN 


sGO SEE IF THIS IS THE LAST PATTERN 
sNO - LOOP ON THIS PATTERN 


sNEXT HIGHER BANK 
sIF NOT DONE - LOOP ON THIS BANK 


:;IS THIS AN EVEN NUMBERED PASS? 
;YES - SKIP 


sCALL SELF 
sMAVE <5 BEEN RELOCATED? 


;CALL SELF 
sUNMOVE E€ UNMAP PROGRAM 


Sanw > WOR 


7285 


ast s Test patie 


015256 


015310 
015514 


015370 


015374 
015400 
015404 


STIc 


015256 
043420 


MACRO 


TERNS FORKLARD -« 


BAWPAR: SUBTST 


«<BANKS WORST FIRST,PATTERNS REVERSE 


c4 


ombbnic rie 14 - ~ ea 82 16:15 PAGE 196 


+E QUENCE 


*oRECURSIVEee> > 


§ SFSSSSSSSSSSSSSSSSSSSESSESSSESSSSSSSSSSESSSSESESSEESSESESESEEESESEESEEEEEEECEEEHEE HEHEHE EE 
;*SUBTEST 


18: 


2s: 


4%: 


S$: 


63: 


BANKS WORST FIRST PATTERNS REVERSE 


*oRECURSI VEes 


CLR BAN ;SET BANK TO 0 

s;START OF BANK LOOP 

CALL € XBANK s;EXAMINE BANK 

TST ACFLAG iCAN WE ACCESS THIS BANK? 

BEG 4% s3NO - GO TO BANK LOCOP TERMINATION 
TST BMF LAG 1IS THIS BAD MEMORY (WORST FIRST) 
BEG 4% sNO - GO TO BANK LOOP TERMINATION 
Ts? RRF LAG sRELOCATION REQUIRED? 

BNE as sYES - GO TO BANK LOOP TERMINATION 
CALL SETPAT ;SET HIGH PATTERN FOR CORRECT MEMOR® 
;START OF oe LOOP 

CALL MTEST 3sGO TEST CORRECT MEMORY 

3S aay t OF PATTERN LOOP 

DEC TTERN 11S THIS THE LAST PATTERN? 

BPL 28 sNO - LOOP ON THIS PATTERN 

; TERMINATION OF BANK Loop 

CLR CONTFLAG 

CALL sNEXT HIGHER BANK 

BGE sIF NOT DONE - LOOP ON THIS BANK 
sEND OF LOOPS 

Cc WORST :IS THIS AN EVEN NUMBERED PASS? 
BNE 58 :;YES - SKIP 

s@eNOTEee RECURSIVE CALL 

a BAWPAR ;CALL SELF 

TST RLFLAG sHAVE WE BEEN RELOCATED? 

BEQ 6$ sNO - SKIP 

RETURN sYES - RETURN 

CALL RELOCATE sMOVE € MAP PROGRAM 

ON.ERROR THEN sRETURN 

s@@NOTEee RECURSIVE CALL 

CALL 1 Rid Ae sCALL SELF 

a UNREL OCATE UNMOVE E UNMAP PROGRAM 


CZMSD00 MS11-./™ DIAGNOSTIC 
BANKS WORST FIRST PATTERNS REVERSE 


"322 015406 


043420 
7357 015534 


MACRO 1113 


14 JAN-62 16:15 PAGE 


RECURSIVE ee 


PAFBAF: SUBTST 


<<PATTERNS FORWARD,BAN«S FORWARD 


14 
198 


_f - 4 NCE 


*eeRECURSIVEee>> 


j POOOOSOSEEESESEEESEEEEEEESESESOEEESESEOESEEOEEEEEEEOEEEOEEEEEEEEEEEEEEEEEEOEEEES 
;¢SUBTEST 


§ SSSSSSSSSSSSSESSSSESSSSESESSESSSSSEEESSSEOSESESESEEESESEOEEEEEEEEESEEHEEEEEOEEEEEEEEES 


1%: 
2s: 


4t: 


5%: 


6%: 


CLR 


CALL 
i; TERMINATION OF BANK LOOP 


CLR 


CALL 
BGE 2s : 

; TERMINATION OF PATTERN LOOP 
CALL INCRPT 


PATTERN 
;START OF PATTERN LOOP 
fe BANK 


MTEST 
CONTFLAG 
INCBNK 


BNE is 
sEND OF LOOPS 
COM 


TMF LAG 


PATTERNS FORWARD ,.BA'KS FORWARD 


5% 
s@eNOTEee RECURSIVE CALL 
ALL PAF BAF 





ON . ERROR 

s@@NOTEsee RECURSIVE CALL 
CALL PAF BAF 
CALL UNRELOCATE 
RE TURN 








*eRECURSI VE ee 


;SET PATTERN TO O 
;SET BANK TO O 
;EXAMINE BANK 


sCORRECT ME My od FOR THIS BANK? 

sNO - GO TO BANK LOOP TERMINATOR 

:CAN WE ACCESS THIS BANK? 

O GANK 5 TERMINATION 
TO BANK LOOP TERMINATION 

3GO TEST CORRECT MEMORY 


sNEXT HIGHER BANK 
If NOT DONE - LOOP ON THIS BANK 


tNEXT HIGHER PATTERN 
;0K - LOOP; ELSE CONTINUE 


;COMPLEMENT TYPE OF MEMORY 
;I1S THIS AN EVEN NUMBER PASS? 
:;YES - SKIP 

;CALL SELF 


s HAVE rep BEEN RELOCATED? 


;CALL SELF 
;UNMOVE E€ UNMAP PROGRAM 


CZMSDDO MS11-./M DIAGNOSTIC 
PATTERNS FORWARD ,BANKS FORWARD 


7360 015536 


002110 
002100 


044302 
044752 


002114 
002126 
002122 
01621le 
seis 
044770 


002132 


MACRO M1113 


F 14 


14-JAN-862 16:15 PAGE 200 


RECURSIVE ee 


PAFBAW: SUBTST 


<<PATTERNS FORWARD ,BANKS WORST FIRST 


SEQUENCE 


*esRECURSIVEee> > 


§ FOSSSSSSSSSSESSOSSSSSSSSEEESEESESSEEEEESESEEHEEEEESESEEEEEEEEEEEEEESEEEEEEE OEE EEEEE 


3; *SUBTEST 


PATTERNS FORWARD, 


BANKS WORST FIRST seeRECURSI vVEee 


2 FSSSOSSSSSSESSESESESSEESESSESSEEESSESESEEEEEESEEEEEEESEEEEEEEEEEEEEESEHEHEHEEEEEEEES 


1%: 
2s: 


4%: 


5%: 


6%: 


7%: 


CLR PATTERN 
ge OF PATTERN LOOP 


CALL — XBANK 
CALL BANK OK 
BNE 44 
TST ACFLAG 
BEQ as 
TST BMF LAG 
BEG as 
TST RRFLAG 
BNE a 


CALL MTEST 
ee! > vos BANK LOOP 
CLR CONTF 


CALL 
8BGE 


2s 
s TERMINATION OF PATTERN x 


CALL INCRPT 
BNE is 
sEND OF LOOPS 
COM THFLAG 


BEG 3$ 

s@*@NOTEee RECURSIVE CALL 
CALL PAF BAW 

RE TURN 


COM WORST 

BNE 6% 

s@@NOTEes RECURSIVE CALL 
CALL PAF BAW 

RET 

TST RLFLAG 

BEQ 7$ 

RET 

CALL RELOCATE 


CALL 
CALL UNRELOCATE 
RE TURN 


URN 
: soNOTE ss — CALL 


;SET PATTERN TO O 

;SET BANK TO O 

sEXAMINE BANK 

sCORRECT MEMORY FOR THIS BANK? 


sNO - GO TO BANK LOOP TERMINATION 

:1S THIS BAD MEMORY CWORST FIRST) 

;NO - GO TO BANK a TERMINATION 
O BANK LOOP TERMINATION 

3GO TEST CORRECT MEMORY 

sNEXT HIGHER BANK 

sIF NOT DONE - LOOP ON THIS BANK 


oOoP 
;NEXT HIGHER PATTERN 
;0K - LOOP; ELSE CONTINUE 


sCOMPLEMENT TYPE OF MEMORY 
31S THIS AN EVEN NUMBER PASS? 
sYES - SKIP 

sCALL SELF 


34TH PASS? 
sYES - SKIP 


sCALL SELF 
s; HAVE a BEEN RELOCATED? 


sCALL SELF 
| UNMOVE & UNMAP PROGRAM 


174 


CZMSDDO 
PATTERNS FORWARD,BANKS WORST FIRST 


7405 


MS11-./™ DIAGNOSTIC 


015710 


015710 
015714 


015764 
015770 


015772 
015776 


045004 
002100 


044302 
044752 


002114 
002122 
016212 
seis 
002110 


002132 


015710 


002124 


0425530 


015710 
043420 


MACRO M1113 
eeRECURSIVE 


PARBAF: SUBTST 


_- = 62 16:15 PAGE 202 


5414 


<<PATTERNS REVERSE ,BANKS FORWARD *oRECURSIVEes>> 


§ SF SSSSSSSSSSSHESSSESESESSESESSEESSESEESSEEEEEEEEEEEEEEHEEEEEEESEEEEEEEEEEEEEEEEHHEEEEDHEEE 


;*SUBTEST 


PATTERNS REVERSE ,BANKS FORWARD seRECURSI VEee 


§ SSSSSSHSESESESSESEESESSEESESEEEESESESESESEEHESEOEEEEEEEEEESEEEEEEEEEEEHAEEESEEEE HEEL EEE 


18: 
2s: 


4$: 


5$: 


63: 


CALL HIPAT :SET HIGHTEST PATTERNS 
;START OF PATTERN LOOP 
étr BANK sSET BANK TO O 
iSTART OF BANK LOOP 
CALL E XBANK sEXAMINE BANK 
CALL BANK OK ;CORRECT MEMORY FOR THIS BANK? 
BNE as sNO - GO TO BANK LOOP TERMINATOR 
TST ACFLAG ;CAN WE ACCESS THIS BANK? 
BEG 4% sNO - GO TO BANK LOOP TERMINATION 
TST RRFLAG iRELOCATION REQUIRED? 
YES - GO TO BANK LOOP TERMINATION 
160 TEST CORRECT MEMORY 


CALL MTEST 
eae OF BANK LOOP 


CONTFLAG 
CALL INCBNK sNEXT HIGHER BANK 
BGE 2s sIF NOT DONE - LOOP ON THIS BANK 
; TERMINATION OF PATTERN Loop 
DEC PATTERN ;NEXT LOWER PATTERN 
BPL is 30K - LOOP; ELSE CONTINUE 
sEND OF LOOPS 


COM TMFLAG ;COMPLEMENT TYPE OF MEMORY 
3IS THIS AN EVEN NUMBER PASS? 


sYES - SKIP 

sCALL SELF 

RE TURN 

TST RLFLAG sMAVE WE BEEN RELOCATED? 
BEQ 6% sNO - SKIP 

RE TURN sYES - RETURN 


TE sMOVE E MAP PROGRAM 
ON.ERROR THEN sRETURN 
s@@NOTEee RECURSIVE CALL 
PARBAF 


BEQ S$ 
;2@NOTEse RECURSIVE CALL 
CALL sé PARBAF 


CALL sCALL SELF 
oy UNRELOCATE | UNMOVE & UNMAP PROGRAM 


SEG ENCE 


. 
-_ 


7443 


MS11-L- 


01640 


016110 
016114 
016120 


016122 
016126 


CZ™SD00 ~ OF 
PATTERNS REVERSE .BA 


: 


MACRO M1115 


14-JAN-82 16:15 PAGE 204 


riid4 


*oRECURSI VE ee 


PARBAW: SUBTST 


<«<PATTERNS REVERSE BANKS WORST FIRST seRECURSIVEse>- 


F FSSHSSHSSHSSSSSSSSSSSSESSSSESSSESSESSESEEESESESEEEEEEEESESOEEEOEEEEEEHEEEHEEEEEHEHEEHEEESE 


;*SUBTEST 


PATTERNS REVERSE ,BANKS WORST FIRST s*eRECURSIVE+ee 


§ SFSSSSHSSSSSSSSEHESSSSSESSEESESESEESSEEEEEEEEEEEEEEEEEEEEEEEEEEEEDREEEEEEEEEEHEEEEEEHEEEE 


1s: 
2s: 


4%: 


58: 


68: 


78: 


CALL HIPAT ;SET HIGHTEST PATTERN 


;START OF PATTERN LOOP 

CLR BANK ;SET BANK TO O 

sSTART OF BANK LOOP 

CALL E XBANK sEXAMINE BANK 

CALL BANKOK sCORRECT MEMORY FOR THIS BANK? 
BNE 4% sNO - GO TO BANK LOOP TERMINATOR 
TST ACFLAG sCAN WE ACCESS THIS BANK? 

BEG 45 sNO - GO TO BANK LOOP TERMINATION 
TST BMF LAG 11S THIS BAD MEMORY (WORST FIRST) 
BEQ as 3NO - GO TO BANK LOOP TERMINATION 
TST RRF LAG ; RELOCATION REQUIRED? 

BNE as sYES - GO TO BANK LOOP TERMINATION 
CALL MTEST 160 TEST CORRECT MEMORY 

; TERMINATION OF BANK LOOP 

CLR CONTFLAG 

CALL INCBNK sNEXT HIGHER BANK 


BGE 2s sIF NOT DONE - LOOP ON THIS BANK 
s TERMINATION OF PATTERN LOOP 

DEC PATTERN sNEXT LOWER PATTERN 

BPL i$ ;OK - LOOP; ELSE CONTINUE 

sEND OF LOOPS 


COM TMFLAG :;COMPLEMENT TYPE OF MEMORY 
:IS THIS AN EVEN NUMBER PASS? 


BEQ S$ sYES - SKIP 
s@@NOTEee RECURSIVE CALL 

CALL PARGAW sCALL SELF 

RE TURN 

COM WORST 34TH PASS? 

BNE 6% ;YES - SKIP 
s@eNOTEee RECURSIVE CALL 

it, PARBAW ;CALL SELF 

TST RLFLAG sHAVE WE BEEN RELOCATED? 
BEQ 7% 3NO - SKIP 

RE TURN ;YES - RETURN 

CALL RELOCATE sMOVE & MAP PROGRAM 


ON.ERROR THEN SRETURN 
;@@NOTEee RECURSIVE CALL 
CALL PARBAW 

CALL UNREL OCATE 

RE TURN 


sCALL SELF 
| UNMOVE E UNMAP PROGRAM 


Ff y 4 NCE 


14-JAN-82 16:15 PAGE 206 


114 
SEQUENCE 


<<SUBR SETUP MEMORY TEST>> 


§ FSSSSSSSSSSESSSSSESESESSESSESSESSSESSSESSESEESEESESEEEEHESESSEEEESEEEEEEEEEEEEEEEEEOEEEEESE 


SETUP MEMORY TEST 


J SSSSSSSHSSSSSHESSESESSESSSSESESSESEEEESESESESESEEEEEEEEEESEEEEEESEEEEEEEEESEEEEEEEEEEEEEEE 


s INITIALIZE HEADER MESSAGE TYPEQUT 
s INDICATE THERE IS A MEMORY UNDER TEST 


sECC? 
sNO - SKIP 


HOL DL.COP 
IF CONTFLAG IS TRUE THEN LEAVE HOLDLOOP 


IF SKIPMK IS FALSE 


CALL 


CZMSDDO MS11 -L/™ DIAGNOSTIC MACRO M1113 

PATTERNS REVERSE.BANKS WORST FIRST eeRECURSIVEce 
7488 016212 MYEST: SUBTST 

oat ; «SUBTEST 

7489 016212 SET 
7490 016220 SET 
7491 016226 005037 002260 CLR 
7492 016232 005737 002116 TST 
7493 016236 001413 BEQ 
7494 016240 BEGIN 
7495 016240 
7496 016246 
7497 016254 004737 016306 
7498 016260 END; 
7499 016260 END 
7500 016260 004737 017520 CALL 
7501 016264 000402 BR 
7502 016266 004737 017740 MTL: CALL 
7503 016272 005037 002106 MT2: CLR 
7504 016276 SET 
7505 016304 000207 RE TURN 


MK CONTROL 
OF IF SKIPMK 
Dt OOP 


sYES - DO ECC TESTS 


300 PARITY TESTS 
sNOW - NO MEMORY UNDER TES! 
;sALLOW HEADERS NORMA, 


J14 


MS11-./M DIAGNOSTIC MACRO M1115 14 JAN-62 16:15 PAGE 208 SEQUENCE 
SETUP MEMORY TEST 
016506 MKCONTROL : SUBTST <«<SUBR TEST ECC CSR LOGIC DISPATCH>:, 

j POROSOOEOEEEESEEESESESEEEEEEEEEEOEEEORESESEEEESESEEEEESEEEEEEEEEEEDEEESEDEEEESS 

; ¢SUBTEST SUBR TEST ECC CSR LOGIC DISPATCH 


{ POPSSOEEEHESEEOESEEEEEESEEESEOEOESEEEEESESESESEEEEEOEOEEEOEEEEEESESEEEEEEOOEEEES 
;THE NEXT TWO MODULES SOLVE THE PROBLEM OF 
s4OW TO RUN THE CSR TESTS ON EACH ECC MEMORY 


; 
0163506 IF SELONLY IS TRUE THEN SRETURN 
016316 It INMECC IS TRUE THEN $RETURN 
016326 PUSH BANK ,RO,R1,R2,R3 
016342 012737 060000 002226 MOV oF IRST , CSRF BANK sSET FIRST TEST ADDRESS TO FIRST ADOR. 
016350 012737 157776 002230 MOV OLAST,CSRLBANK 
016356 005037 002232 CLR CSRINT 
016362 005037 002254 CLR SPLTCSR 
016366 005037 002504 CLR CSRL OOP AND ZERO THE LOOP COUNTER 
016372 013700 002102 MOV BANK INDE x , RO iGET THE BANK INDEX 
0163576 016001 002626 MOV CONF IG(RO).R1 ;GET CSR NUMBER 
016402 000501 SWAB 
016404 042701 177766 BIC erci7, Ri 
016410 006501 ASL 
016412 0101357 002500 MOV Ri. CSRHOLD sSTORE IN THE LOW BYTE 
7526 016416 0057357 002134 TST INTFLAG 31S THIS BANK INTERLEAVED? 
016422 001421 BEG is sBRANCH IF NOT INTERLEAVED 
016424 0052357 002234 INC SPLTCSR 
7S29 016430 012737 120000 002230 MOV #120000 , CSRLBANK 
016436 005237 002504 INC CSRLOOP ;WE MUST LOOP TWICE FOR AN INTERLEAVED BANK 
016442 005237 002232 INC CSRINT 
016446 016001 002626 MOV CONF IGCRO),R1 ;GET THE INTERLEAVE CSR NUMBER 
016452 O72127 177775 ASH @-3,R1 
016456 042701 160777 8Ic #*C17000,R1 
016462 050137 002500 BIS Ri. CSRHOLD ;STORE IT IN CSRHOLD’S UPPER BYTE 
7S36 016466 005005 is: CLR RS 
016470 116337 002500 002146 MKLOOP: MOVB CSRHOLD( RS). CSRNO 
016476 042737 177741 002146 BIC @*C36 .CSRNO sCLEAR ANY UNNECESSARY BITS 
016504 FOR R2 ;= @O TO CSRINT 
016506 FOR CSRFIRST :* CSRFBANK TO CSRLBANK BY oe 
016514 MAP BANK sMAP TEST SPACE TO BANK 
7342 016530 104511 INVAL IDATE sINVALTDATE BACKROUND PATTERN 
016532 BEGIN CSRSTUFF 
016532 005037 002506 CLR SUCCESS 
016536 IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
7346 016552 013737 002222 002224 MOV CSRFIRST,CSRLAST 
016560 062737 004000 002224 ADD  #4000,CSRLAST 
016566 FOR TESTADD :* CSRFIRST TO CSRLAST Br 04 
016574 013737 002364 002366 MOV TESTADOD, TESTADD+2 
016602 005737 002234 TST SPLTCSR 
016606 001404 BEG is 
016610 062737 040000 002366 ADD #40000 , TESTADD +2 
016616 000405 BR 2% 
7534 016620 062737 000002 002366 1s: ADO #2, TESTADD+2 
cranes 004737 017114 2s; CALL SBE TEST 
016634 104424 CACHOF F i TURN CACHE OFF 
016636 005037 002074 CLR NOP AR s INDICATE PARITY ACTION 
016642 FOR I :* #0 TO @27 
016646 SET HEADER 


016654 005037 002260 CLR PASFLG 


CZMSDDO MS11-./7M DIAGNOSTIC 
SUBR TEST ECC CSR LOGIC DISPATCH 


017112 


010637 
162737 
004737 


104425 


005237 


062757 
dod 


00520 

020337 
003002 
000137 
104472 
005037 


000207 


MACRO M1115 


002226 
002234 


1$: 


14 JAN-82 16:15 


Ki4 


PAGE 208-1 
LET RO :* I 
PUSH RS sSAVE LOOP COUNTER 
MOV SP,CTLKVEC sSAVE VECTOR IN CSR OF rt 


SUB @2,CTLKVEC 
CALL CSRCASE 
POP RS 
END ;OF FOR I 
CACHON 


SET SUCCESS 
LEAVE CSRSTUFF 

END ;OF ON.NOERROR 
END ;OF FOR TESTADD 


sRESTORE LOOP COUNTER 
;TURN CACHE ON 


END ;OF IF 


END CSRSTUFF 
IF wa IS FALSE 
TYPE MSGA34 


a ga BANK, <TYPES BANK NUMBER>, 3 
TYPE MSGB34 


END ;OF IF SUCCESS 


POP 
RE TURN 


END; OF FOR CSRFIRST 
CSR 


;TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
ag 


SPLTCSR 
R3,R2,R1,R0, BANK 


»E GUENCE 


CZMS 
SUBR 
7597 


017114 


017114 


017174 
017176 


017242 


DOO MS11 ./™ DIAGNOS 
TEST ECC CSR LOGIC DISPA 


TIC 


013701 002364 
013704 0023566 


Re M1115 


SBE TEST: SUBTST 
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L14 


<«<CHECK FOR SBE FREE LOCATIONS>»> 


§ FSSSSSSSSESSESSSHESESSESEASSESSESESESSESESESESEESEEEEEEOEEEEEEEEEEEEEEEHEEEHEREHEEHEHEEEEEES 


3 ¢SUBTEST 


CHECK FOR SBE FREE LOCATIONS 


fF SF SSSSSSSSSSSSSSSSSSSESESEEEESEEESESESEEESEEEEEESESEEEEOEEESESEEEEEEHEEEEHEOEHEEEEEBEE 


ae ORDER TO DETERMINE IF A LOCATION IS SBE FREE I DO THIS 


S WRITE ZEROS WITH ECC DISABLE 
;READ ZEROS BACK 
:IF NOT ZEROS THEN RETURN ERROR 


: 

sWRITE ZEROS WITH ECC ENABLED BUT TRAPS DISABLED 
sREAD ZEROS BACK 

ab NOT ZEROS THEN RETURN ERROR 


iTEST THE LOCATION FROM THE PAR'S (WITH NO PROGRAM FETCHES) 
:IF THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR 


i 

;COMPLIMENT ZEROS TO ONES WITH ECC DISABLE 
sREAD ONES BACK 

ws NOT ONES THEN RETURN ERROR 


iWRITE 100, .100000,00000 (CHECKBITS COMPLIMENT OF BEFORE ) 
; WITH ECC ENABLED BUT TRAPS DISABLED 

;TEST THE LOCATION FROM THE PAR‘'S (WITH NO PROGRAM FETCHES) 
i;IF THERE WERE ANY SBE‘S OR DBE‘S THEN RETURN ERROR 


; 
IF NONE OF THE ABOVE FORCES A RETURN ERROR THEN RETURN NO.ERROR 


LSB 
RO,.R1,R4 ;PUSH RO,.R1,R4 ONTO STACK 
STADD.R1 


MOV TE 
MOV TESTADD +2,R4 


TESTAREA sENTER TEST MODE 
CACHOFF sTURN CACHE OFF 
ECC1DIS sDISABLE ECC ON 1 SELECTED CSR 
CLEAR (R1),(R4) 
TST (R1) 
BNE SBENT 
TST C(R4) 
BNE SBENT 
CLRICSR sCLEAR 1 SELECTED CSR 

EAR (R1),C(R4) 
TST C(R1) 

NT 
TST (R4) 
NT 

TSTREAD sTEST LOC (RL) E TST FOR SBE CWITHOUT FETCHES) 
IF @BITIS!GIT4 SET.IN CSR 

SET SKPERR ;OISABLE ERRGEN'S ERROR PRINTOUT 

ERRGEN 

MOV ows RO 

ASH 6-4,RO 

BIC fCi77,R 


IF BANK EG RO THEN GOTO SBENT 
END; OF IF eBIT15 


€CCioIs sOISABLE ECC ON 1 SELECTED CSR 


St GUA NCE 


‘oe 
- 


M14 


CZMSOO0O MS11-./M DIAGNOSTIC MACRO M1113 14 JAN-82 16:15 PAGE 210-1 SE GUENCE 
CHECK FOR SBE FREE LOCATIONS 

7651 017244 005111 COM (R1) 

76S2 017246 005114 COM (R4) 

7653 017250 023711 002556 CMP ONES ,CR1) 

7654 017254 001046 BNE SBENT 

7655 017256 023714 002556 CMP ONES ,(R4) 

nat 017262 001045 BNE SBENT 

7658 017264 104503 CLRiCSR ;CLEAR 1 SELECTED CSR 

7659 017266 005011 CLR (Riz 

7660 017270 012714 100000 MOV oBIT1S,(CR4) 

7661 017274 005711 TST (R1) 

? 017276 0010355 BNE SBENT 

7663 017300 022714 100000 CMP OBIT15,(R4) 

Le pn 017304 001032 BNE SBENT 

7666 017306 104510 TSTREAD sTEST LOC (Ri) E€ TST FOR SBE (WITHOUT FETCHES) 

7667 017310 IF @BITIS!BIT4 SET.IN CSR 

7666 017320 SET SKPERR sDISABLE ERRGEN’S ERROR PRINTOUT 

7669 017326 104512 ERRGEN 

7670 017330 013700 002432 MOV ERRADD,RO 

7671 017334 072027 177774 ASH #@-4,RO 

7672 017340 042700 177600 BIC #tC177,R0 

7673 017344 IF BANK EQ RO THEN GOTO SBENT 

La gn 017352 END; OF IF @BIT1S 

7676 017352 104417 KERNEL sENTER KERNEL MODE 

7677 O17354 1044753 ECCLINIT sINITIALIZE 1 SELECTED CSR 

7676 O17356 104423 CACHON 3 TURN CACHE 

7679 017360 POP R4,R1,RO sPOP RO,R1 E R4 FROM STACK 

rene 017366 tRETURN NOERROR 

7682 017372 104503 SBENT: CLRICSR ;CLEAR 1 SELECTED CSR 

7683 017374 CLEAR (R1),(R4) 

7684 017400 104417 KERNEL sENTER KERNEL MODE 

7685 017402 104473 ECCLINIT : INITIALIZE 1 SELECTED CSR 

7686 017404 104423 CACHON ; TURN CACHE 

7687 017406 POP R4,R1,RO ;POP RO,.R1 E R4& FROM STACK 

7688 017414 SRETURN ERROR 


7689 .OSABL LSB 


CZMSDDO MS11 7M DIAGNOSTIC 


CHECK FOR SBE FREE LOCAT 


7692 


017420 


017420 


021174 


T 
I 


ONS 


MACRO M1115 


CSRCASE : SUBTST 


Ni4 
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<<CSR PATTERN CASE STATEMENT>> 


SEQUENCE 


§ FSSSSSSSEASESSEESESESESESESESESESEEEEEEEEEESEEEEEEEEEAEEEEEEEEEEEEEEEREEEEEEEEEEEE 


; SUBTEST 


CSR PATTERN CASE STATEMENT 


F FSSSSSESSSSESSESESESSESEESSESEEESEEESESEESEHEREEEEEEEEEEEEEEEEHEEEEEEEEEEEEEEEEEEEEESEES 


MKCSRT: 


CASE RO 


;sWARNING IF YOU CHANGE THIS TABLE ALSO 
;CHANGE “$00WO” 


:PAT TIME 
0006 


ecoocoocoocoooocoooorrrr 


“$D0WS” (THE PATTERN BIT MAP) 


DISCRIPTION 
INITIAL DATA TEST 
BYTE ADDRESSING TEST 
INTERRUP TES 

CREATE SINGLE BIT ERROR TEST 
WRITE BYTE CLEARS SBE TEST 
CREATE DOUBLE BIT ERROR TEST 


T ENABL 


WRITE INHIBIT DURING DATIP WITH OBE 


WRITE INHIBIT OF BYTE WITH DBE 
ie el OF WORD WITH DBE 


*. 
* 


B2 


CZMSODC 


CSR PATTERN CASE 


"26 


MSii . 


017520 


017714 


— se 
> 


™ DIAGNOS 


STATEME NT 


0020 74 


“acRo 1115 


002074 
002300 


002142 


PTES 


14 


T: 


, 
i 
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SUBTST <«<SUBk ECC TEST DISPATCH>>» 


;*SuBTEST 


SUBR ECC TEST DISPATCH 


MKPAT: 


IF @SWO SET.IN @SWR OR ACTFLAG IS TRUE 


— ;D0ISABLE ERROR CORRECTION 
CLRCSR ;CLE@R ALi CSR’S 

END ;OF IF 

“OV @2.,.NOPAR s INDICATE nS ACTION 

“Ov . ; TRAPS ADD 2 7 


;GET PATTERN reer 

ASL RO ;MAKE IT A B. ADORE SS 
If MKPAT(RO) NE @MTO0O34 AND MKPATCRO) NE @MTO999 

INVAL IDATE :; INVALIDATE BACKGROUND PATTERN ON 
= ;0F IF MKPAT(RO) 


SP .CTLKVEC sSAVE VECTOR IN CASE OF fx 


‘BAN 


Sus @2,CTLKVEC 
CALL @KPATCRO) s INDEX OFF TABLE 
IF @SwO SET.IN @SWR OR ACTFLAG 8 TRUE 
ote RAP ON SINGLE BIT ERRORS 
ECCINIT ; TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
END :OF IF @Swo 
CLR MOP AR ; INDICATE PARITY ACTION 
RE TURN 


eae If you CHANGE THIS TABLE AL 
“$D0w0~ “s00wS” (THE SAT TERN BIT MAP) 
SPAT IPTION 


TIME OISCR 
sMOTE ‘a: MUST BE FIRST € LAST 
MTOO34 <j 1SOFT 
SMOLDING 1 


- BACKGROUND PATTERN TEST 
‘S € O'S TEST 








MTOS99 © SEC sNULL TEST 
—T0999 ; O SEC NULL TEST 
MTO999 +; O SEC sNMULL TEST 
MTO999 ; O SEC sNULL TEST 
MTO999 ; O SEC sNULL TEST 
—TO999 «6; O SEC sNULL TEST 
™TO999 ; O SEC sMAL TEST 
—TO999 ; O SEC sNULL TEST 


tw meee 


ted 


vipa” Cee rest BiSeaye.*° 


7784 


017740 


0127537 


000002 
000002 
060000 


060002 
002110 


002074 


MACRO M1115 


002142 


MUTEST: 


Cis 
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SUBTST <<SUBR PARITY TEST DISPATCH>> 


fs SSSSSSSSSSSSSSSESSSSHESSSESESSESESSCESESESESEEEESESEESEEEEEHEEEREAEEEEEEOEHEEEEEHEEES 


;*SUBTEST 


SUBR PARITY TEST DISPATCH 


£ SSSSSSSSSSSSSESSSEESSSHESSSEESEESEESEESEEESEEEESEEEEEEEEEEEEOEEEEEEEEHEEEHEEEEEEEEEEE 


MJPAT: 


MOV @2,NOPAR s INDICATE PARITY ACTION 
MOV e2 , PCBUMP ; TRAPS ADD 2 TO PC 

MOV oF IRST, TESTADD 

MOV OFIRST+2, TESTADD+2 

MOV PATTERN,RO 3GET gly a NUMBER 

ASL RO ;MAKE IT A WORD ADDRESS 


IF MJPATCRO) NE @MTOO3S4 AND MIPAT(RO) Ne ontoI99 


INVAL IDATE sINVALIDATE BACKGROUND PATTERN ON “BANK” 
END ;OF IF MUPAT(RO) 
MOV SP .CTLKVEC sSAVE VECTOR IN CASE OF *« 
SUB @2,CTLKVEC 
CALL SMIPAT(RO) i INDEX OFF TABLE 
CLR ; INDICATE PARITY ACTION 
RE TURN 


sWARNING — IF YOU CHANGE THIS TABLE ALSO 
i;CHANGE “SDOWO” - “$D0WS” (THE PATTERN BIT MAP) 











;PAT TIME DISCRIPTION 
sNOTE re ig MUST BE FIRST € LAST 
MT0034 1 SEC sSOFT ERROR - BACKGROUND PATTERN TEST 
MT a SEC INITIAL DATA TES’ 
MTOOL7? ;<1 SEC sHOLDING 1‘S € 0’S TEST 
MTOOO7 ;<1 SEC 
MTOOO1 ;<1 SEC 
0002. ;<1 SEC 
MTOOOS ; 1 SEC 
MTOOO4 ; 1 SEC TES 
MTOOOS ; 1 SEC sROTATING yg TEST 
mMTOO021 ; 1 SEC sMARCHING 0O°S € 1°S TEST 
MTOOSS ;<1 SEC WORSE CASE worse PARITY TEST 
MTOO22 ;10 SEC sREFRESH TEST 
mTOO025 ;10 SEC sSHIFTING DIAGONAL TEST 
MTOO026 ;<1 SEC $ DATA TEST 
MTOO24 ;20 SEC 3FAST GALLOPING PATTERN TEST 
MTOOS1 ; 3 SEC 3SO0B8-A-LONG TEST 
MTOOS2 ;<i SEC sWRITE RECOVERY TEST 
MTOOSS ;35 SEC sGRANCH GOBBLE TEST 
MTOOS4 ;<1 SEC sSOFT ERROR - BACKGROUND PATTERN TEST 
sWOTE MTOO34 MUST BE FIRST € LAST 
MTO999 =~; O SEC sNULL TEST 
mTO999 +; O SEC sNULL TEST 
MTO999 +; O SEC sWULL TEST 
MTO999 +; O SEC ;sNULL TEST 
MTO999 ; O SEC sNULL TEST 


PANE 


ZmSD00 mSii i 


020 
7681 020366 


™ DIAGNOST! 


a) 
ry 


MACRO 


003720 
6002256 


002262 


172254 


177654 


003720 
002256 


002262 


172254 


M1115 


DiS 
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.SBTTL PATTERNS 


.SBTTL MEMORY TEST SETUP ROUTINES 
MTO0000: SUBTST <<MTO00O SETUP DATA PATTERN TEST>» 
j POCOOOEOESOESEDOSESESEESEDEEESEEESEOESOEOEEEEOEHEOEOEEEEOEESEEEEOEEOEESEEEEEEENESS 
; ¢SUBTEST MTOOOO SETUP DATA PATIERN TEST 


£ FSSSSSSSESSSSESHSSEHEEEESESESESEESEEEEEEESEEESEEEEEEEEEEEEEEEEEEEEEEEEEESEEEEEEEBE 


CLR REALPAT ;SETUP PATTERN NUMBER FOR YTYPEOUT £ DISPLAY 
MOV oF IRST,RO 
MOV @OSIZE,R1 
CALL REGCOP Y 
CMP 61,PROTYP sARE WE ON AN 11/447 
BEQ is ;BRANCH IF YES 
MOV @MTPOOO , SUPDOADD s;ELSE DO PATTERN IN MAIN MEMORY 
CALL suPDOs 
RE TURN 
L$: BMOV MTPOOO 
ae SUPD01 :00 IT IN SUPERVISOR MODE 
MTOOO1: SUBTST <<MTOOO1 SETUP ADDRESS TEST>> 


2 FSSSSSSSHSESESSEESSESESSESESESEALESOEEESEEEESEESEEEESEELEESESEEESEEEEEEEEEEEEEEOEBESEES 


3; SUBTEST MTOOO1 SETUP ADDRESS TEST 
fs PSOSSESEESEOSESOOEESESEOEOEEEEEEEEEEEEEEEEEOEEEEESEEEOESEEEEEEREEEEEOEEESEDEBES 
MOV @1,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV IRST,RO 
MOV @SIZE ,R1 
Ts? 
BNE 2s 
CMP SIPARS , SIPAR6 
BNE 4s 
BR 3% 
2s: CMP UIPARS , UIPAR6 
BNE a4 
3%: MOV #30000 ,R1 
4%: CLR Re 
CALL REGCOP Y 
Cre @1,PROTYP sIS THIS AN 11/44? 
BEG is ;BRANCH IF IT IS 
MOV @MTPOO1 . SUPDOADD sSET UP CALLING ADORESS 
CALL SUPDOS 
RE TURN 
18%; BMOV MTPOO1 
a SUPDO1 :00 IT IN SUPERVISOR MODE 
MTOOO2: SUBTST <«<mMTOOQO2 SETUP COMPLEMENT ADDRESS TEST>> 


£ SSSSSESSSESSSSSSSSSESESSSEHOSESSEESSESSSSDSSESSSSSSHESSEASSSHESEESESESSEESESESSEHSEKEESESEE 


; *SUBTEST MTOOO2 SETUP COMPLEMENT ADDRESS TEST 


§ 9 SSE FOS S$ES$OSSEEEEEOSESEEEEOEO4EOOEEEOESEEEESEOEOEESEEEEEESEEESEESESKESEEEEESEEEEOEE 


@2 ,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV @LAST+2,R0 
MOV @SIZE .R1 
MOV OF IRST ,R4 
MOV #100001 ,R5 
TST Q 
BNE 2s 
CMP SIPARS , SIPARG 
BNE 4% 


NT’ "ADORE SS 


177652 


027114 
026644 


026466 


ene M1115 
TEST 


177654 


2s: 
Ss: 


4%: 


1%: 


“2. 
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5% 
ica ae 
#30000 ,Ri 


#140000 , RO 
#120001 ,R5 
#1,R2 


R1,R3 
@1,PROTYP 
$ 


1 
eMTPOO2 , SUPDOADD 
SUPDO3 


MTPOO2 
SUPDO1 


iI1S THIS -" 11/44? 
TRUE 


te el 
;SET UP 


CALLING ADDRESS 


SEQUENCE 


CZMSO00 
MTOOO2 


MS1 
SET 


021016 


1-./™ 
wc 


DIAGNOSTIC 
ADDRESS TEST 


OMP EME 


012737 


N’ 


eet M1115 


003720 


002256 


002256 


177642 
172374 
172276 
172272 


002560 


177652 


MTOOOS: SUBTST 
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<<MTOOOS 


SEQUENCE 147 


SETUP 3 XOR 9 WORST CASE NOISE TEST>» 


£ FSSSSSSSSSESSSSSSESSESSESSSESSESESESESESESESSESSEEEEEHEEESEEESESEEEEESEEEECEEEEESEEEEOEEEEEES 
; SUBTEST 
£S FSSSSSSSSSESSSSESSSSESSESESSESOSESESESEEESEEEESSEESCEESESCEEEEEEEEEEEEEEEEEEEEEEEEHEEOEEEEES 


IF EVFLAG IS TRUE THEN SRETURN 


1%: 
2s: 


3$: 


4$: 


MTOO0O04: SUBTST 


§ SSSSSSSSSESSHSSESEESSSHEEEESEESESEEEEEEEEOESSEEEEESEEOSEHEEHEEEEEEEEEEEESEEEEEOESEEE 


3; *SUBTEST 


1%: 


@3,REALPAT 
PCBUMP 


@MTPAOS , SUPDOADD 
SUPDO3 


eMTPBOS , SUPDOADD 
SUPDO4 


ay 
MTPAOS 


#1032, SOPARS 


SuP002 
@3.FLIPLOC 


is 


< <MTO004 


MTOOOS SETUP 3 XOR 9 WORST CASE NOISE TEST 


;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
; TRAPS DO NOT ADD TO PC 

;SETUP WARNING CONSTANTS € R2 

sR1 <-- STARTING ADDRESS 


;R3B <-- RB / 256 
sBRANCH IF IT IS 


;00 IT IN MAIN MEMORY 


;SET UP PAR LINKS 


sCHANGE INST TO BR .+66 (BR TO KDPAR1) 


;DONE WITH 4 PATTERNS 
ASP eR S212 PAERFELES OD sCO08 .ETT7TT Del LITTTT AMEDD? 
3 - L 


SETUP ROTATING ZEROS TEST>> 


MTO004 SETUP ROTATING ZEROS TEST 


£ FSSSSOSSSSSESSESESSSESHESSESESHESSSESESESESESESEOEESEOEEEOEESEHEEEEEEEESEESEESEESEEEEEEESES 


MTPAO4 


MTPBO4 ,KOPARO,8. 
OKDPARO, UIPARS 


04 ,REALPAT 
64 , PCBUMP 


sSETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
sTRAPS ADD 4 TO PC 


sWRITE BACKGROUND OF ONES 
iIS THIS AN 11/44? 


sBRANCH IF IT IS 
;SET UP LINKS 


CZMSOD0 MS11-./M DIAGNOSTIC 
SETUP ROTATING ZEROS TEST 


021172 


012757 
004737 
000207 


0127357 
012737 


012737 
012737 
004737 
000207 


177654 
026502 


MACRO M1115 


172376 


002262 
002300 


003720 


002256 
027356 


027356 


177652 
172376 


MOV 


CALL 
RE TURN 


MTOOOS: SUBTST 


§ FSSSSSESSASSESHESSESSSEHSSESEHSSETESESEHEESESEESEEEEEEHEEOEEEEEEEEEEEEEEEEEEEEEEEOEEESELOS 


3 SUBTEST 


J SSSSSSHSSSSSSESSSESESSESEEEEEEEESEEEEEEEOEEEEEHE CEEEEEEEEEEEEEEEEEHEHEESESEEEEEE 


1$: 


G15 
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OUIPARGE , KDPAR7 
SUPD02 


<<MTOOOS 


0S ,REALPAT 

04 , PCBUMP 

R2 

8 

oF IRST ,RO 

@SIZE,R1 

—" 
@MTPOOS . SUPDOADD 
IMTPOOS +14, MTPBO4 + 16 
SUPD04 
OMTPAD4 +14 ,MTPBO4 +16 
MTPOOS 

MTPBO4 ,KDOPARO, 
@KDPARO , UIPARS 
@UIPARG ,KDPAR7 
SUPDO02 


SEQUENCE 188 


SETUP ROTATING ONES TEST>> 
MTOOOS SETUP ROTATING ONES TEST 


sSETUP PK" RN NUMBER FOR TYPEOUT £ DISPLAY 
s TRAPS ADD 4 TO PC 


sWRITE BACKGROUND OF ZEROS 


11S THIS AN 11/44? 
sBRANCH IF IT IS 
;SET UP LINKS 


sRESET TEST’S ORIGINAL VALUE 


FOO0S, SETUP ROTA 


021174 


012737 
012737 
012701 
012737 
004737 
000207 


012757 
005002 


004737 
012701 
012702 
05020 


1 
012737 
004737 
000207 


AGNOSTIC | MACRO M1113 14 JAN-82 16:15 PAGE 221 
ING ONES TEST 


002262 
002300 


002256 


002262 


002256 


002262 
002300 


HiS 


SEQUENCE 18% 


MTOOO6: SUBTST <<«MTO0006 SETUP INITIAL DATA TEST>>» 


§ SSSSSSSSSSSESSEESESSESEESSEEESSSESESEEEESESEEEESSEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEOOEHEEEEE 


;*SUBTEST MTOOO6 SETUP INITIAL DATA TEST 


§ SSSSSSSSSSSSSESSESSEEESESESSESESEESEEEEEEEEEEESEOEEEEECEEEEEEEEEEEEEEEEEEEEEEOEEEESE 


06 ,REALPAT ;sSETUP PATTERN NUMBER FOR TYPEOUT £& DISPLAY 


MOV 04 , PCBUMP sTRAPS ADD 4 TO PC 

MOV @TESTADD,R1 

MOV OMTPOOG , SUPDOADD 

ites SUPDOS 1:00 IT IN SUPERVISOR MODE 
MTOOO7: SUBTST <<MTO007 SETUP ADDRESS BIT TEST>> 


§ SSSSSSESSSESSE SESE SESESEEESSEEASEEEEEEEEEEEESEEEEEEEEEEEEEEEEEEEEESEHEEESESEEEES 


; *SUBTEST MTOOO7 SETUP ADDRESS BIT TEST 


§ FSSSSASSSSSSESSESSESSEESESESSESEEEEEEEESEEEEESEEEEEESESESEEEEEEEEEEEEEEEEEEEEEEEEE 


—h @7 ,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
CALL sOF ZEROS 

MOV OF IRST,R1 

MOV #1,R2 

BIS Ri 

MOV @MTPOO7 , SUPDOADD 

CALL $s s00 IT IN SUPERVISOR MODE 


RETURN 
MTOO1O: SUBTST <<MTOO10 SETUP BYTE ADDRESSING TEST>> 


§ SSSSSSSSSESSSSESHSHSSESSEEESESEEESESSEEEEESEESSEEEHEEEEEESEEESESEESEESEESEEOEESESEEEESEEESE 


;*SUBTEST MTOO1O0 SETUP BYTE ADDRESSING TEST 


§ SSSSSESSSSSSEHESESESESHSSESSESESESEESESSEEHEEEEESEEEESSEEEEESEEEEESEEEESEEEEEESEEAAESEEE 


MOV #10, REALPAT ;sSETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV 04, sTRAPS ADD 4 TO PC 

MOV TESTADO,,R4 

MOV @MTPO10, SUPDOADD 

a suPp0s ;00 IT IN SUPERVISOR MODE 


CZMSODO 


MTOO10 


gecease | 8 


S 
°o 


SSSSss 
el ee a ee 
QU &whre 


MS1i1-./™ DIAGNOSTIC 
SETUP BYTE ADDRESSING TEST 


021526 


021 
0213572 


021606 
8040 021614 


8041 


021620 


012737 
012757 
004737 
000297 


012757 
013700 


012705 
012705 
012737 
004737 
000207 


012737 
012737 
012737 
004737 
000207 


012737 
012737 
004737 
000207 


000011 
026644 


000014 
031722 
026644 


MACRO M1115 


002262 
002256 


002262 


002256 


002262 
002256 


7 om 
> 
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MTOOL1: SUBTST <<MTOOL1 SETUP CREATE SINGLE BIT ERROR TEST>> 
ee rrrrririrririrriiliiiiririiririiirriirirrririririiy 
; SUBTEST MTOO11 SETUP CREATE SINGLE BIT ERROR TEST 
j PO PSEEEOEEESSEEOEEESEEEEEEEEEEEESEEEEEEEEESESEEEEOOEEEEEEEEESEEEEEEEOEEEEEESESS 
IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 
IF $PASS NE @0 THEN SRETURN 


END; OF IF ACTFLAG 
MOV #11 ,REALPAT sSETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
MOV OMTPO11,SUPDOADD 
ite, SUP0O03 100 IT IN SUPERVISOR MODE 
MTOO1l2: SUBTST <<MTOO12 SETUP WRITE BYTE CLEARS SBE TEST>> 


FS SSSSSSSSSSSSSSESSSSSSSESESESESOSEESESESESEEESEEESEEEEEEEESEEEEEEEEEEEEEEESEEEEEEOEE 


; *SUBTEST MTOO12 SETUP WRITE BYTE CLEARS SBE TEST 


j PA OROSEOEAESSESEOESEEEEEEEAESESEEEEEESSEOEEEEEEEEOEEEEEEEOEEEEEEEEEEESEODEEEEEES 
IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 
sSETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV INDE X ,RO 
IF @BIT1I2 SET.IN CONF IG+2(RO) 
MOV #40000,R5 
ELSE 
MOV 62,.R5 
END; OF IF @BIT1i2 
MOV @MTPO12 , SUPDOADD 
ities :D0 IT IN SUPERVISOR MODE 
MTOO13: SUBTST <«<MTOO1S SETUP CREATE DOUBLE BIT ERROR TEST>> 


§ SFSSHSSSSSSSESSSEESSSESEESESSESSESESESEESEEESESASESESSSSESEESSEESEESEEEESESESEEEEESEHEOEE 


; *SUBTEST MTOO15 SETUP CREATE DOUBLE BIT ERROR TEST 


§ PSSSSSSSESSESSSSESSSSSSHEASSESSESESSSESESOSESEESEEESEASESESEESSESESEEESEEHEEEEEEEEESE 


IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 
IF 8PASS NE @0 THEN SRETURN 
END; OF IF ACTFLAG 
MOV #13, REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV @MTPO13 , SUPDOADD 
MOV @3 , NOPAR s INDICATE PARITY ACRION 
SUPDO 1:00 IT IN SUPERVISOR MODE 


RE TURN 
MTOO14: SUBTST <<MTO014 SETUP WRITE INHIBIT OURING DATIP WITH DBE>> 
j SSOSOOHOSESOSESOESSEDEOHESEOAEESSEEEEOOEEEEEEEEESEEESSLOESRESEEESEEEESESEOESEES 
; *SUBTEST MTOO14 SETUP WRITE INHIBIT DURING DATIP WITH DBE 
| SOSSOSORESESEBEESOEOESEEESEOSEEEEEESEEEEEEEEEEEEDEEEEEAEHEEHEDEOESEEESESEEEEEEES 
IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 
IF $PASS NE @0 THEN SRETURN 


END; OF IF ACTFLAG 

IF KFLAG Is og F _— SRE TURN 

MOV #14 ,REALPA sSETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV erTP014 . SUPDOADD 

ritrees SUPD0S :00 IT IN SUPERVISOR MODE 


CZMSDDO MS11-./™ DIAGNOSTIC 
SETUP WRITE INHIBIT OURING DATIP WITH DBE 


“TOOLS 
8044 


021622 


012737 
012737 
004737 
000207 


012737 
012757 
004737 
000207 


012737 
012737 
004737 
000207 


034032 
026644 


MACRO 1115 


002262 
002256 


002262 
002256 


002262 
002256 


ud l 5 
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MTOO15: SUBTST <<MTOO15 SETUP WRITE INHIBIT OF BYTE WITH DBE>> 


§ FSSSSSESEHSESESEEESESEESSESEESSESESESEESEEESEEEEEEEEEEEEEOEEEEEEEEEEEEEEEEEEEEEEEEEEEE 


; *SUBTEST MTOO1S SETUP WRITE INHIBIT OF BYTE WITH OBE 


§ SSSSSSHSSSSSSESSESSSSESSEESESSSESESEEEESEEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEES 


IF ACTFLAG IS TRUE OR poy IS TRUE 


IF 8PASS NE @O THEN $RET 
END ;OF IF ACTFL 
MOV #15,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
MOV @MTPO15, SUPDOADD 
CALL SUPDOS 300 IT IN SUPERVISOR MODE 


RE TURN 
MTOO16: SUBTST <<MTOO16 SETUP WRITE INHIBIT OF WORD WITH DBE>> 
F SSSSSSSHSSSSESSSSSESSESSSESESEAESSSEEEHESESESESESESESEECEESEESEEESEEEEEEEEEEEEEEOHRESEDES 
; *SUBTEST MTOO16 SETUP WRITE INHIBIT OF WORD WITH OBE 
§ FSSSSSHSSSSESSSSASSSSESSESESESSEESESSSEHEEESEEESEEEEEESEEEEEEEEEEEEEEEEEESEEEEHRESEHEEE 
IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 
IF $PASS NE @0O THEN sRETURN 
— ;0F IF ACTFLAG 


#16 ,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV @MTPO16 , SUPDOADD 
CALL 3 s00 IT IN SUPERVISOR MODE 


RETURN 
MTOO17: SUBTST <«<MTOO17 SETUP HOLDING 1‘'S & 0'S>> 


F SSSSSESSSSSSSSSESSESSSSEEEESEHSESSAESESSEEESESEESEEEEEEEEEEEESEEESEEESEEEESEEESEESEEEEEESO 


;*SUBTEST MTOO17 SETUP HOLDING 1‘S € 0’S 


§ FOSSSSSSSSESSESESSSSSESSSSESSEESEEESEASSESEESESESESEEESEEEEAESSEEEEESEESEEESESEEEEE 


MOV 017 ,REALPAT sSETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV OMTPO17 , SUPDOADD 
rie 300 IT IN SUPERVISOR MODE 


CZMSDDO MS11 ./M DIAGNOSTIC 


MTOO1? 
8067 9021760 


022066 
80863 022072 


8120 022250 


SETUP HOLDING 1° 


012737 
012737 
005001 


005004 
012700 
013702 


012737 
012705 


012737 
012705 


012737 
012705 


00030 
042703 
010337 


SE£0°S 


002364 
002366 


177775 


177741 
002146 


MACRO M1115 


002262 
002074 


002364 


002364 


002364 


K 1° 


a 
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MTOO20: SUBTST <<MTOO20 


SEQUENCE § 192 


SETUP MARCHING 0'S € 1'S IN CHECKBITS TEST>» 


§ FSSSSSSSSESSHESSSESEESSEASSESEEEASESEEESESEEEEEEEEEECESEEEEEEEEEESESEEEEEEEEEEEEEEEEEESE 


; *SUBTEST 


MTOO20 SETUP MARCHING 0'S € 1'S IN CHECKBITS TEST 


§ PF SSSSSESSSHESSESSHESESSSESESESESESESESESESEEEEEEEEEEESEEEEEHEEEEEEESESEEEEEEEEEEEEEEEEEES 


IF ACTFLAG IS TRUE OR ACTFLAG IS TRUE 


IF $PASS NE @0 THEN $RETURN 


END ;OF IF ACTFLAG 
MOV 


@20,REALPAT 
MOV 03 ,NOPAR 
CLR i 
CLR 4 
MOV oF IRST ,RO 


MOV BANK INDE 
MTLO2O: IF INTFLAG IS FALSE 
IN MTBO20 


BEG 
If NO2Z2BIT IS TRUE 
IF BANK EQ 07 


;SETUP PATTERN NUMBER FOR TYPEOUT E DISPLAY 
s INDICATE PARITY _——— 

;CLEAR LOOP COUNTE 

;CLEAR INTERLEAVE O00 /EVENs FLAG 


;SET BANK INDEX 


#140000, TESTADD ;SET UP 12K NON-INTERLEAVED VIR! ADOR 
40002 ,R5 


MOV 
MOV @LAST+4,R5 
END MTBO20 





MOV RS, TESTADD<-2 
ELSE 
TST SKIPMK 
BEG i$ 
RET 
18: MOV #120000, TESTADD 
MOV @LASTe2,R5 
MOV RS, TESTADD-2 
INC SR 
INC Ri 
INC R4 
END; OF IF INTFLAG 
MOV CONF IGCR2),RS 
IF R4 EQ 62 
ADD R4,TESTADD 
ADD R4,TESTADD+2 
ADO 2RO 
ADD R4,RS 
ASH @-3,R3 
ELSE 
ASL R35 
END; IF R4 
fy 





:SET UP NON-INTERLEAVED VIRT. ADOR. 


:IS THIS BANK IN SKIP RANGE? 

;BANK IS OUT OF RANGE - DO TEST 

;sLEAVE TEST-BANK’'S ALREADY TESTED 

sSET UP iST INTERLEAVED VIRT. ADDR. 

;SET UP END OF BANK FLAG 

;SET UP 2QND INT’L. VIRT. ADOR. 

tFLAG THE MAPPING ROUTINE FOR INTERLEAVING 
:;SET LOOP COUNTER FOR INTERLEAVING 

;SET ODO/EVEN FLAG 


sSET UP CSR NUMBER 

3IF THE SECOND TIME AROUND 
sTEST THE Al ASSERTED ADDRESSES 
sMOVE INTERLEAVED CSR NUMBER 


;sMOVE CSR NUMBER 


;MOVE R3 INTO CSR NUMBER 


ZMSODO MS11-./™ DIAGNOSTIC 


SETUP MARCHING O'S & 


20 
022422 
022430 


104506 
104472 


036532 
020000 
020000 
002366 
022452 
0022354 


002234 
000001 


002074 


MACRO M1115 
1S IN CHECKBITS TEST 


002364 


Lis 


14 JAN-62 16:15 PAGE 22?7-i 


IF @SWO SET.IN @SWR 
ENASBE 

ELSE 
ECCINIT 

END; OF IF @SWO 

PUSH R2,R4 

FOR MTvO20 := 60 TO Ri 
PUSH Ril 
CLR 


SEQUENCE 


; TRAP ON SINGLE BIT ERRORS 
is TRAP ON UNCORRECTABLE ERRORS 


sPATTERN TO WRITE INTO BANK 
;SET UP ZEROS IN BANK 


CALL BACKGND 
IF NO22BIT IS es Mp MTVO20 EQ 01 ANO BANK E 


#20000, TEST 
20000 ,RS 


CALL MTO20Z 

ee 

END; OF FOR MTVO20 
R4,R2 

CLR Ri 

CLR SPLTCSR 

CMP @1,R4 

BEQ MTLO2O 

CLR NOPAR 

RE TURN 

MTVO2O: O 


Q 63 
;SET UP 12 INTERLEAVED BANK 


;START TEST 
sUPDATE INTERLEAVED MAPPING FLAG 


sRESET LOOP FLAG 

sRESET INTERLEAVED MAP FLAG 
sODD/EVEN FLAG SET? 

;BRANCH IF TRUE 

; INDICATE PARITY ACTION 

; VARIABLE FOR PAT 20 


ae be 


SFSSGR° SPH MlaBNR 2S 


012702 


012703 


022737 
001411 
012737 
012757 
004757 
000410 


012737 


000004 
002364 
002366 
100000 


€ 1°S IN 


MACR 


003720 


wecnbirs tT 


MTO2O02: 


1%: 


2s: 


4$: 


MTO2OY: 


78: 
Bs: 


18: 


2s: 


38: 


4%: 


5$: 


M15 


a 16:15 PAGE 228 SEQUENCE 
MOV 04 ,R2 ;SET UP WORD INCR/DECR AMOUNT 
MOV TESTADO,.R1 
MOV TESTADD+2,R4 
MOV oBIT15,R3 
IF @SW1l SET. IN @SWR OR QVFLAG IS TRUE 

GOTO MTO20Y 
END ;OF IF @SW1il 
CMP @1,PROTYP sIS THIS AN 11/44? 
BEQ 1$ ;BRANCH IF IT IS 
MOV @MTPA2O , SUPDOADD 
MOV OMTPA20 +14, PARTHERE ;VECTOR FOR TRAPS 
CALL SUPDOS5 
BR 2s 
BMOV MTPA2O 
MOV @UIPARGE , PAR THERE ;VECTOR FOR TRAPS 
CALL SUPDO1 
CMP @1,PROTYP :IS THIS AN 11/44? 
BEQ 4% ;BRANCH IF IT IS 
MOV @MTPB20 , SUPDOADD 
MOV OMTPB20+-10, PARTHERE sVECTOR FOR TRAPS 
CALL SUPD04 
BR MTO2OY 
BMOV MTPB20 
MOV @UIPAR4 , PARTHERE sVECTOR FOR TRAPS 
CALL SUuPD02 
TST INTFLAG ;ARE WE INTERLEAVED? 
BEG 7% sBRANCH IF NOT ae” tn toean 
SUB #40000 ,R1 ;RESET FIRST WORD TO BEGINNING OF BANK 
= — sRESET SECOND WORD TO BEGINNING OF BANK 
MOV OF IRST,R1 sRESET FIRST WORD TO BEGINNING OF BANK 
MOV FIRST +2 ,R4 sRESET SECOND WORD TO GEGINNING OF BANK 
CMP #1, PROTYP :IS THIS AN 11/44? 
BEQ is sBRANCH IF IT IS 
MOV @MTPC20 , SUPDOADD 
MOV @MTPC20+ 10, PARTHERE :; VECTOR FOR TRAPS 
CALL SUPDOS 
BR 2s 
BMOV MTPC20 
MOV GUIPAR4 , PAR THERE s VECTOR FOR TRAPS 
CALL SUPDO1 
CmMP 61 ,PROTYP :IS THIS AN 11/44? 
BEQ 36 ;BRANCH IF IT IS 
MOV OMTPD20 , SUPDOADD 
MOV @MTPO20 +14, PARTHERE ; VECTOR FOR TRAPS 
CALL SUPDO4 
BR 4$ 
BMOV MTPD20 
MOV @UIPARG , PARTHERE ; VECTOR FOR TRAPS 
CALL SuP0D02 
CMP @1,PROTYP :IS THIS ys bacee? 
BEQ 5% ;BRANCH IF IT IS 
MOV @MTPE2O , SUPDOADD 
MOV OMTPE20+10, PARTHERE sVECTOR FOR TRAPS 
CALL SUPDO04 
BR 6$ 
BMOV MTPE20 


94 


CZMSDDO MS11-L/M DIAGNOSTIC 


Nis 


MACRO M1113 14-JAN-82 16:15 PAGE 228-1 


MTOO20 SETUP MARCHING O'S € 1'S IN CHECKBITS TEST 


8209 023046 


012737 
004737 
104505 
000207 


177650 002266 
026502 


6$: 


MOV OUIPAR4 ,PARTHERE 
CALL SUPDO02 
CLRICSR 


gs VECTOR FOR TRAPS 


;CLEAR 1 SELECTED CSR 


SEQUENCE 


9 


c 
J 


ee 


8212 023050 


“S11 i/™ OI 
SETTLE MARCH 


AGNOSTIC 
ING O'S E€ 2 


002412 


MACRO Mi11;°* 


IN CHECKBITS TEST 


MTOO21: 


SUBTST 


e 
b} it 
14. JAN-82 16:15 PAGE 230 


«<™TOO21 


St GJENCE 


SETUP MARCHING 90'S £15 TEST>» 





; SUBTEST MTOO21 SETUP MARCHING 0'S £ 1°'S TEST 
§ SSSSSSSSSSSSSSSHSSSSEHESSESESESESSEEESEEESESESEEEEEESSSEEESEEEEEEEEOEEEEEEEEEEOEEEEEOS 
— amy REALPAT T 
° ;SETUP PATTERN NUMBER FOR Tr H Ar 
a at Re PEOUT & OISP.. 
CALL BACKGND 
MOV R2,R5 
SWAB Rs 
“OV @LAST+-2,R1 
MOV R1L,RS 
MOV oF IRST ,R4 
Cup @1,PROTYP 31S THIS AN 11/44? 
BEQ is ;BRANCH IF IT IS 
Ch @3,.PROTYP sIS THIS AN 11724? 
BEG 3% ;BRANCH IF SO 
CMP 07, BANK 
BNE 38 
MOV 
MOV 
S$: MOV 
CALL 
OV 
CALL 
MOV 
MOV 
CALL 
MOV 
CALL 
BR 
18: CoP 
BNE 
MOV 
MOV 
4%: BMOV 
CALL 
BM0yv 
CALL 
MOV R4 Ri 
BMOv =s MTPC21 
CALL SUPDO02 
8MOV MTPD21 
CALL 
2s: CLR NOSCOPE 


RE TURN 


fOOeh SETUP MARCHING O oe 1S 4 


025322 


004737 


0127537 
012737 
0047537 
000207 


004757 


012737 
0127357 


TIc 


0264 52 


000022 
034444 
026644 


000025 
034444 


002262 
002256 


002262 
002256 


eee Ml1135 14-JAN-82 16:15 PAGE 2531 


C16 


>& GUENCE 


MTOO22: SUBTST <<MTOO22 SETUP REFRESH €& SHIFTING DIAGONAL TES'>> 


§ FSSSSSESSSSESESSESESESSESSESESESESSSSESESEESEESEEEESEOEEEESEESEEEEEESEEEEEEEEEEEHEEEEEEEE 


s*SUBTEST MTOO22 SETUP REFRESH € SHIFTING DIAGONAL TEST 


§ SSSSSSSSSSSSHSSSESSSSSSESESSSESEESESSEESESESEESESEESESOSEEEEEEESEEEEESEESEEEEEOEEESEES 


CALL KAMITEST ;CHECK FOR KAMIKAZE MODE 

ON.ERROR THEN $RETURN :IF NOT IN KAMIKAZE MODE RETURN 

MOV 622 ,REALPAT sSETUP PATTERN NUMBER FOR TYPEQUT € DISPLAY 
MOV oMTPO22, SUPDOADD 

a s00 IT IN SUPERVISOR MODE 


MTOO23: SUBTST <<MTOO23 SHIFTING DIAGONAL TEST>>» 


§ FSSSSSSSESSSHESSESSSSSSESEEEEESESESESEEESEESESEEEESSEEEEEEESEEEEESEEESEEEESESESEEEES 


;*SUBTEST MTOO23 SHIFTING DIAGONAL TEST 


§ FSSSSSSHSSSSSESSSSESESESESEESEHESSESSEESESEESESEHOEEEEEEESEESEESESEEEEEEEEEEEEEEEEEEEEOEEE 


CALL KAMITEST ;CHECK FOR KAMIKAZE MODE 


ON.ERROR THEN SRETURN sIF NOT IN KAMIKAZE MODE RETURN 

MOV 6235 ,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
MOV OMTPO22, SUPDOADD 

SET DIAGFLAG sIDENTIFY DIAGONAL TEST TO MTPO22 

CALL SUPDO3 :00 IT IN SUPERVISOR MODE 

a. OTAGFLAG 


ZMSODO MS11-L/M DIAGNOSTIC 
SMIF TING DIAGONAL TEST 


023420 


012757 
012737 
004737 
000207 


137776 
035160 
000177 
137776 


026660 
002412 


000025 
035212 
026644 


MACRO M1115 


002262 


172374 


002262 
002256 


MTOO024: SUBTST 


14. JAN-82 16:15 PAGE 232 


D16 


SE GUENCE 


<<MT0024 SETUP FAST GALLOPING PATTERN TES'>> 


; *SUBTEST 


38: 


1%: 


4$: 


2s: 





MTOO24 SETUP FAST GALLOPING PATTERN TEST 
§ FSOSSSSSSSHESSSSSESSSHESSSESESESSSESESESEHEESEEESESEEESEEEESESEHESEEEEEEEEEEEEEOEEOEEEE eam & 
Ga Emnon’ en: RETURN ‘Sr Ou RARIRAZE MODE 
‘ : IN KAMIKAZE MODE RETURN 
MOV «@24 <REALPAT Tu 
° 3 SE PATTERN NUMBER F Ty T AY 
MOV BAKPAT ,R2 ” a 
CALL BACKGND 
MOV R2,R3 
MOV R3,R4 
SWAB R4 
MOV OF IRST,R1 
MOV @LAST,RS 
CMP 01,PROTYP 
BEQ is 
CMP @3,PROTYP 
BEG 38 
CMP @7 ,. BANK 
BNE 3$ 
MOV 0137776,R5 
SAVREG 
MOV @MTPB24 , SUPDOADD 
BR 2s 
CMP @177,LASTBANK 
BNE 43 
MOV #137776,R5 
SAVREG 
BMOvV 
BMOV 
BM0V 
MOV 
MOV ;SET UP PAR LINKS 
MOV 
MOV 
CALL 
:D0 IT AGAIN FOR COMPLEMENT DATA 
RE SREG 
SWAB Re 
SWAB RS 
CALL SUPDO4 
CLR NOSCOPE 
<«<MTO0025 SETUP INTERRUPT ENABLE TEST>> 


RE TURN 
MTOO02S5: SUBTST 


§ SSESSSSSSESSHSSSSSESSSSSSESSHSHSHSSESSESSSHESHESSOSSSHOSSHASSEHESEHESSESHOSEHESEHEKEHEEOEEE 


1s *SUBTEST 


MTO0025 SETUP INTERRUPT ENABLE TEST 


§ SSOSHSSSSSSSSESSSSESEESSHSSESSSESSSSEDSSSESSSESSSHSESHHESHEHSSEHESESEHESESEEEESSEHESDEEES 


IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 
IF $PASS NE #0 THEN $RETURN 

END ,OF IF ACTFLAG 

MOV 025 ,REALPAT 

@MTPO2S , SUPDOADD 

SUPDO3 


sSETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 


MOV 
CALL :00 IT IN SUPERVISOR MODE 


RE TURN 


2 75 


CZMSO00 MS11-./M DIAGNOSTIC 


MTOO25 
8329 025732 


6373 024232 


012737 
0050 


SETUP INTERRUPT ENABLE T 


000730 


172360 
177644 


026466 
035710 
172360 
026466 


002546 
002544 


MACRO M1115 
EST 


002262 


003720 
003720 
002100 


035764 
002256 


035764 
002256 


002100 


172376 


177642 
172274 


177642 


MTOO026: SUBTST 


E16 


14 JAN-862 16:15 PAGE 234 


<«<MT0026 


»—E QUENCTE 


SETUP RANDOM DATA TEST>> 


§ FSSSSSSSSSESSSESESESSEESSESESESESEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEHEEEEEEEEE 


;*SUBTEST 


MTOO26 SETUP RANDOM DATA TEST 


SF SSSSSSOSHSSSSSEHESSESSSSEOSSESESSEEEESEEEEESEEEEEEEEEEEEEEEREEEEEEEEEEERESEEEEEEEEEEEE 


3%: 


16: 


4$: 


2s: 


MOV 026 ,REALPAT 
PCBUMP 


MOV SEEDLO,RS 
MOV —° 


MOV R3, 

MOV R2,R4 

MOV OFIRST,R1I 
MOV @SIZE/2,R0 
CMP @1,PROTYP 
BEQ 1s 

CMP @3.PROTYP 
BEQ 3% 

CMP @7 , BANK 
BNE 3% 

MOV #14000 ,RO 
SAVREG 


MOV @MTPA26 +4, MTPD26°-14 
OMTPA26 , SUPDOADD 








CLR RANODO 
MOV OMTPB26 +4 .MTPD26+14 
MOV OMTPB26 . SUPDOADD 
RESREG 
CALL SUPDO3 
BR 2s 
CMP 0177 ,.BANK 
BNE a 
MOV #14000 ,RO 
»KDOPARO ,8 
€730 ,KDPAR7 
ARO ,8 
@KDPARO , UIPAR1 
AR2 , SOPARG 
i 
MTPB26 
@KDPARO , UIPARL 
RESREG 
CALL SUPD01 
MOV R3,SEEDLO 


MOV R2 , SEEOMI 


sTRAPS DO NOT ADD [TO THE PC 
; INITIALIZE RANDOM NUMBERS 


300 WE HAVE AN 11/44? 
;BRANCH IF WE DO 
311/24? 

;BRANCH IF SO 


sFOR ERROR REPORTING 
;SET UP NEXT LINK 


sWRITE ROUTINE TO FAST MEMORY 
;R SUBPROGRAM TO 


ANDOM FAST MEMORY 
;WRITES “BR .-116” IN (BR SDPARO) 
sRANDOM SUB AM TO FAST MEMORY 


;WRITE RANDOM DATA 

sFOR ERROR REPORTING 

;READ ROUTINE TO FAST MEMORY 
;SET UP PAR LINK 


sREAD RANDOM DATA 
s;UPDATE FOR NEW RANDOM NUMBERS 


F 16 


CZMSODO otto L/™ DIAGNOSTIC MACRO M1115 14 JAN-82 16:15 PAGE 236 SEQUENCE 2700 
MTOO26 SET RANDOM DATA TEST 
8376 024234 MTOO27: SUBTST <<«MTOO27 UNIQUE BANK TEST>> 
§ FSSSSSSSSSSSSSSSESSESESSESSESEEOSESSESESEESEEESEEEESEEEEEEEEEEEEEEEEEEEEEEEEOEEEEEES 
; ¢SUBTEST MTOO27 UNIQUE BANK TEST 
§ FSSSSSSSSSEESESSHESSSESESSESESESSESESSESEESEEESESEEEEEEEEEEEESESEEEEEEESEEEEEEEEEOEEEESEEEE 
8377 sMAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA 
8378 sWRITE AND READ THE SANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM IS) 
8379 024234 012737 000027 002262 MOV @27 ,REALPAT ;SETUP PATTERN NUMBER FOR ‘'YPEOUT & DIS®_AY 
8380 024242 104502 CLRCSR ;CLEAR CSRS 
8381 024244 022737 900001 003720 CMP @1,PROTYP :1S THIS - 11/44? 
8 024252 001404 BEG i$ s;BRANCH IF TRUE 
8383 024254 012737 026644 002474 MOV @SUP005 ,LINK1 SET UP tak 
8384 024262 000414 BR STAR27 ;BRANCH TO RUN 
8385 024264 i$: BMOV MTPO 
8386 024272 012737 177646 002256 WARN?: MOV @UIPARS, 
8387 024300 012737 026466 002474 MOV @SUP001 ,LINKI ;SET UP LINK 
8388 024306 SET NOF SMODE 
8389 024314 STAR27: FOR I := @1 TO 2 
8390 024322 FOR BANK := @0 TO LASTBANK 
8391 024 004737 044302 CALL EXBANK 
8392 024332 IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
8393 024346 104511 INVALIDA re s INVALIDATE BACKGROUND PATTERN ON “BANK” 
8394 024350 LET Re : ) 
8395 024354 012700 060000 MOV OF IRST.RO 
8396 024360 010004 MOV RO ,R4 
8397 024362 012701 040000 MOV SIZE .R1 
8396 024 010103 MOV RS 
8399 024370 IF I €Q @1 
8400 022737 000001 003720 CMP @1,PROT YP 
8401 001403 BEQ 
024410 012737 036204 002256 MOV @MTPOS4 , SUPDOADD 
8403 024416 004777 156052 2%: CALL a 
8404 024422 END ;OF IF 
8405 024422 IF XY EQ @2 
8406 0244352 022737 000001 003720 Chr @1,PROTYP 
8407 024440 001403 BEG 
8408 024442 012737 036212 002256 MOV OMTPO34 +6 , SUPDOADD 
8409 024450 004737 9 38: CALL S 
8410 024454 END ;OF IF 
8411 024454 END ;OF IF 
8412 024454 END ;OF FOR BANK 
8413 024470 FOR I 
8414 024 IF FS7FLAG IS TRUE 
8415 0245 005037 002400 R NOF 
3416 024516 000207 RETURN 
8417 024 END ;OF IF FS7FLAG 
8418 024520 FOR I :* #1 TO @2 
86419 024526 FOR BANK :=° LASTBANK DOWNTO @0 
8420 024534 004737 044302 CALL E 
8421 024 IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
8422 024554 LET R2 := BANK 
6423 024560 005102 COM Re 
8424 024562 012700 060000 MOV oF IRST,RO 
8425 024566 010004 MOV ,R4 
6426 024570 012701 040000 MOV @SIZE,R1 
8427 024574 010103 MOV R1,R3 
8428 024576 IF I €@ @1 
8429 02 022737 000001 003720 @1,PROTYP 


CZMSDDO MS11-L/M DIAGNOSTIC 


MTOO27 


UNIQUE BANK 


024712 
024716 


001405 
012737 
004777 


022737 
001405 
012757 
004737 


005037 
000207 


TES? 


036204 
155644 


002400 


MACRO ™1°i5 


002256 


003720 
002256 


i4 JAN-82 16:15 PAGE 236-1 


BEG 43% 
MOV OMTPOS4 , SUPDOADD 
4%: CALL a INK1I 
END ;OF IF 
IF I EQ 02 
CMP 01,PROTYP 
BEQ 5 
MOV OMTPO54-+-6,SUPDOADD 
5$: CALL SUPDO3 
END ;OF IF 
END ;OF IF 
END ;OF FOR BANK 
END ;OF FOR I 
CLR NOF SMODE 
RET 


G16 


SE GUE NCE 


FOSR? SEldat Sab 


024720 


005037 
012757 


012737 
000406 
012737 


012737 
104470 


004737 


012701 
012700 
004777 


104502 
004737 


104472 
000207 
013737 

37 


STIC 
ES’ 


042530 


MACRO M1115 


002262 
002074 
003720 


002474 


002474 
002256 


002100 


H1i6 


i4- JAN-82 16:15 PAGE 238 SE GUE NCE 


29 < 


MTOOSO: SUBTST <<MT0030 SETUP FLUSH OUT DBE‘S TEST>> 


§ FSSSSSSESHSSSESSSESESSEEESEEESESESEEEEHESOESEOEESEEEEESEEEEEEEEEEEECESEOEEEEEEEEEEEES 


; SUBTEST MTOOSO SETUP FLUSH OUT DBE’S TEST 
§ SSSSSSEHESSSESESSESSSSESESEESESESEEESESESEEEEEEEEEEESEEEEEEEEEEEEEEEEEEEEEEEOEEEEEE 
CLR PASFLG 
SET FULLREL 
MTAOSO: MOV @30,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
MOV @1,NOPAR ; INDICATE COUNT PARITY ERRORS 
CMP @1,PROTYP 
BNE Gy 
BMOV MTPO3O 
4$: MOV @SUPD03, LINK! 
MOV @MTPOSO , SUPDOADD 
1$: ECCOIS sDISABLE ERROR CORRECTION 
SET NOF SMODE . NOSCOPE 
FOR BANK ;:= 60 TO LASTBANK 
CALL EXBANK 
IF MKFLAG IS T 
IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
MOV ZE ,R1 
MOV oF IRST,RO 
CALL OL INK} 


END ; F 
IF PASFLG IS FALSE 
SET PASFL 
CLAC ;CLEAR CSRS 
ge RELOCATE 
ECCINIT ; TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
NOF SMODE , NOSCOPE , FULLREL 
RE TURN 
END ;OF ON.ERROR 
NE WE ANK , BANK 
EXBANK 
CALL MTAOSO 
ECCINIT ; TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
ALL UNRELOCAT 
RET 
END ;OF IF PASFLG 
ECCINIT :; TRAP ON DOUBLE BIT ERRORS (NORMAL ) 


CLEAR NOFSMODE ,NOSCOPE ,FULLREL 
RE TURN 


MS11-L 
SET 


025222 


004737 


012737 
005037 


/M DIAGNOSTIC 
UP FLUSH OUT DBE'’S TE 


— M1113 14-JAN-82 16:15 PAGE 240 


002262 


002256 
002474 


172254 


177654 
002474 


116 


SE QUENCE 


MTOOS1: SUBTST <<MTOO31 SETUP SOB-A-LONG TEST>> 

§ POSSESSES EOESESEEESESSEEESESESEOEEEEEEEESEESESEEEESEEEEEEOEEEEEEEEEEEEEOEEEEEEEES 

;*SUBTEST MTOO3S1 SETUP SOB-A-LONG TEST 

j PO COSEEEESSESESEOESESEEEEESESEEEEEEEEDEEEEESESEEEEEEEEHESEEEEOEEOOEEEEESEEEEEES 
CALL KAMITEST ;CHECK FOR KAMIKAZE MODE 

sIF NOT IN KAMIKAZE MODE RETURN 


ON.ERROR THEN sRETURN 
SET SCOPE 
MOV 031 ,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
CLR AR ;SETUP PARITY ACTION 
MAP sMAP FIRST SO BLOCK MOVE WORKS 
TESTAREA sENTER TEST MODE 
Vv MTPO31,F IRST, SOBLENGTH/2 
KERNEL sENTER KERNEL MODE 
MOV SOBK ,R2 
MOV R2,RO0 
MOV €100776,R1 ;COMPLEMENT OF INSTRUCTION "SOB RO,OOT” 
MOV oF IRST+SOBLENGTH,RS 
MOV OF IRST +2, SUPDOADD 
MOV OLAST+2,LINK1 
TST NOSUPER 
BNE is 
CMP SIPARS , SIPAR6 
BEG 2s 
BR 3% 
1$: CMP UIPARS , UIPAR6 
BNE 3% 
2s: MOV #140000, LINKI 
3%: CALL SUPDO4 
CLR NOSCOPE 
RE TURN 


CZMSDDO MS11 ./™ DIAGNOSTIC 


8521 025412 


8574 025714 


004737 


012737 
005027 


012737 


010025 
010144 
077203 


SETUP SOB -A-LONG TEST 


026452 
000032 
002074 


010247 
177667 


020000 
002474 
060000 


MACRO M1115 


002262 


172254 


177654 


002476 


003720 


002256 


003720 
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MTOO3S2: SUBTST 
{ POORER EEEESEEOEEEOSEEESEEEESEEEEEEEEEEEEEEEEOEEOEEEESEEEEEEEDEEEEEOEEEEEEEOS 
; *SUBTEST 


§ FSSSSSSESSSSESESSESEEESSEHESSSESESESEESESEESEEEEEEEEESEEEEECEEEEEESEEOEEEESEREEEEEEEEEEEE 


18: 
2s: 


38: 
4$: 


5%: 


6%: 


7$: 


J16 


SEQUENCE 204 


<<MTOOS2 SETUP WRITE RECOVERY TEST>> 


MTOOS2 SETUP WRITE RECOVERY TEST 


CALL KAMITEST ;CHECK FOR KAMIKAZE 
ON.ERROR THEN SRETURN ;IF NOT IN KAMIKAZE MODE RETURN 
SET NOSCOPE 
MOV @32,REALPAT ;sSETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
CLR NOP AR sSETUP PARITY ACTION 
MAP BANK sMAP FIRST SO THAT THE BLOCK —_ Re 
MOV 910247 ,RO ;0P CODE OF INSTRUCTION “MOV -€ PC)” 
MOV 177667,R1 sOP CODE OF COMPLEMENT OF INSTRUCTION “JMP CRO)” 
MOV @SIZE/2,R2 ;USED FOR . /2 BANK LOOP 
MOV Re .LINK1L 
MOV @FIRST,RS 
CLR LINK2 
TST NOSUPER 
BNE 1% 
CMP SIPARS , SIPAR6 
BEG 2s 
BR 3$ 
CMP UIPARS , JIPARE 
BNE 3$ 
MOV #140000 ,R4 
MOV #14000 ,Re2 
MOV R2,LINK1 
MOV 01,LINK2 
TESTAREA sENTER TEST MODE 
sMOVE TEST TO MEMORY UNDER TEST 
MOV RO,CR3)> 
MOV Ri, - (R4) 
$oB . 
01,PROTYP 


BNE 
sMOVE LAST PART OF TEST TO FASTCITY 
BMOV MTPOS2 


KERNEL 


sENTER KERNEL MODE 


:0P CODE OF INSTRUCTION “COM 
sADORESS TO RETURN TO IN RO 
;TOP OF BANK 


#5141 ,R2 
#108 ,RO 
@LAST+2,R1 
oF IRST, 
LINK2 

6% 

#140000 ,.R1 


SUPD04 
@SIZE/2,R3 
#110,R5 


-(R1)” 


76 
#14000 R35 
1,PROTYP 
8$ 


MS11-./M DIAGNOSTIC 


SETUP WRITE RECOVERY TEST 


012737 
004737 
000402 
004737 
005037 
000207 


036054 002256 
026660 


026502 
002412 


MACRO M1113 


KK 16 
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OMTPOS2, SUPDOADD 
SUPD04 


9% 
SUPDO2 
NOSCOPE 


SEQUENCE 8205 


sTHIS RETURN ACTS AS A NORMAL RETURN FROM MTOO32 


sALSO A RETURN FROM THE 


"CALL 


SUPD04”" ABOVE 


MS1i-L/M OI 


8585 025744 


SETUP WRITE RE 


004737 


012737 
005037 


022737 


002262 


002256 


002474 


172254 


177654 
002474 


002262 


003720 


002256 


003720 


002256 


003720 


By P+" MACRO M1115 14 JAN-62 16:15 PAGE 244 
VERY TES’ 


MTOO33: SUBTST 
§ SSSSSSSESSESSSESSSSESOESSEESEEESDESEEEESEEEEEEEEEEESEEEEEEEEEEEEEEEEEEEEREREEEEEEEEEE 
; *SUBTEST 


§ PF SSSSSESSESESESESESEESESESSESESESEEESESEEESESEEESEEESEEEEEEEESEEEEEEEEEESEEEEEEEEEEEEEEEEEEEEES 


18: 
2s: 
3$: 


lL 16 


SEQUENCE 


<<MTOOS5S5 SETUP BRANCH GOBBLE TEST>> 


MTOOS3 SETUP BRANCH GOBBLE TEST 


CALL KAMITEST ;CHECK FOR KAMIKAZE MODE 
ON.ERROR THEN $RETURN sIF NOT IN KAMIKAZE MODE RETURN 
SET NOSCOPE 
MOV @33,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
CLR NOPAR sSETUP PARITY ACTION 
MAP BANK sMAP FIRST SO THAT BLOCK MOVE WORKS 
TESTAREA s;ENTER TEST MODE 
BMOV MTPO33,FIRST,GBLENGTH/2 
KERNEL ;ENTER KERNEL MODE 
MOV OF IRST +GBLENGTH,RS 
MOV @F IRST +4, SUPDOADD 
MOV OF IRST+2,R1 
MOV OF IRST+3,R2 
MOV @LAST+2,LINKi 
TST NOSUPER 
BNE 18 
CMP SIPARS , SIPAR6 
BEG 2s 
BR 3% 
CMP UIPARS , UIPAR6 
BNE 3% 
MOV #140000 ,LINK1 
CALL SUPDO4 
CLR NOSCOPE 
RE TURN 
<<MTOO34 SOFT ERROR - BACKGROUND PATTERN TEST>> 


MTOO34: SUBTST 


§ SSSSSSSESSSSHESESSSESSESSSSSSSOHSEEESSSEHELECHSEEESEESESESEEEEEEESEEEEEHEEEEEEOEEESES 


; *SUBTEST 


§ SOSSSSSSSSSSSESSSSESESSSSHSSHEHKSESSESSSAESSEHOOSEHKESEHESHSEEESESSEAAEESASEEEOEEEOEEEEE 


18: 


2s: 


MTOO3S4 SOFT ERROR - BACKGROUND PATTERN TEST 


MOV 034 ,REALPAT 
MOV oF IRST RO 
MOV @SIZE .R1 
MOV SOF TPAT ,R2 
MOV R1 RS 
ta BANK INDEX .RS 
CmP #1 ,PROTYP 3IS Lt - 11/44? 
BNE 1s sBRANCH IF NOT 
BMOV MTPO34 
MOV @UIPARS , SUPDOADD 
IF @BIT15 SET. IN Bo Ae eae. 
sBACKGROUND PATTERN IS VALID 
CMP @1.PROTYP 
BEQ 2s 
MOV @MTPO34+6,SUPDOADD 
P aa SUPDO3 sREAD IT 
L 


sBACKGROUND PATTERN HAS BEEN INVALIDATED 


CMP 


#1,PROTYP 


206 


M | nr 


MS11-L/M DI 1 RO M1113 14-JAN-82 16:15 PAGE 244-1 26 
SOFT ERROR DRZKGHOUND PATTERN ter SEQUENCE = 207 
026252 001406 BEQ 33 
026254 012737 036204 002256 MOV  o@MTPO34, SUPDOADF 
026262 004737 026644 CALL SUPDO3 
000402 BR 4 
026270 004737 026466 3$: CALL SUPDO1 ;WRITE IT 
026274 052765 020000 002630 43: BIS  OBIT13,CONFIG-2(R5) ;VALIDATE IT 
026302 END ;OF IF @BIT13 
026302 000207 RETURN 
026304 MTOO3S: SUBTST <<MTOO3S SETUP WORST CASE NOISE PARITY TEST>> 
§ SFSSSSSSESESESSESESESEESEESESEEEEEEEEEEEESEEEEEEEEEEEEEEEEEEEEEAEEAEEEEEEEEEEBEROESOS 
; #SUBTEST MTOO3S SETUP WORST CASE NOISE PARITY TEST 
§ SSSESASSESESSESSESESSEEESEEEAESEESEDESEEEEEEEEEEEEEESEEEEEEEEEEEEEEEEEEEEEESEEOEEEEEEE 
026304 012737 000035 002262 MOV @35,REALPAT ;SET UP TEST NUMBER FOR DISPLAY 
026312 013703 002102 MOV BANKINDEX ,R3 
026316 016301 002626 MOV CONFIG(R3),Ri1 
026322 000 SWAB ORL 
026324 042701 177760 BIC @tC1?,R1 
026330 006301 ASL Ri 
026332 010137 002146 MOV R1.CSRNO 
026336 023737 002146 002504 CHP CSRNO, PGMCSR 
026344 001001 BNE is 
026346 RE TURN 
026350 012702 052524 1s: MOV €52524 .R2 
026354 004737 036532 CALL ;WRITE BACKROUND OF ALMOST ALT. 1°S AND O'S 
026 012737 036230 002256 MOV @HTPOSS , SUPDOADD 
026 737 026644 CALL 
026372 IF QVFLAG IS TRUE THEN $RETURN 
005102 COM R2 
004737 036532 CALL BACKGNO ;WRITE COMPLEMENT PATTERN INTO MUT 
026410 004737 026660 CALL  SUPDO4 
026414 000207 RE TURN 


CZMSDDO MS1i iM DIAGNOSTIC MACRO M1113 14-JAN-82 16:15 PAGE 246 SEQUENCE 
MTOOSS SETUP WORST CASE NOISE PARIT: TEST 


6667 026416 MTO999: SUBTST <<MT0999 SETUP NULL TEST>> 
§ PS SOSSSSOSSESSSOSESSSSOEESSESSOESESOEOEEESEEEESEESESEEOEEEEEEEEEEEE DEED EOEEEEEES 
3; SUBTEST MTO999 SETUP MAL TEST 
5 PSPS SOSEOSSSESSOSOSESESESEOEESEEESEESESEEEEEEESEEEEEEEEEEEEEEEEEESE HEED OEEEES 
8666 026416 005037 002262 CLR REALPAT 
8669 026422 SET NULLFLAG 
thy 026430 000207 RE TURN 
8671 
8672 026452 KAMITEST:SUBTST <<CHECK FOR KAMIKAZE MODE >> 
§ PO SSSSSESESSEEEOESOESESEEEEEOOEESSEEEESSEEEESSEEOEEEEEOEEEE SESE EESEEEEEEEEEOEEESS 
; «SUBTEST CHECK FOR KAMIKAZE MODE 
§ SOSOSSOSSEESOSESEEESOSEEESESSESESESESEESOEEEEEOOESEEEOEEOEOEOEESEEEEEEEEEESEEEES 
8673 026432 If KAMIKAZE IS TRUE OR ACTFLAG IS TRUE OR APTFLAG IS TRUE 
8674 026454 SRETURN NOERROR sRUN THE TEST 
8675 026460 ELSE 
8676 026462 SRETURN ERROR ;D0N' T RUN THE TEST 


8677 026466 END ;OF IF KAMIKAZE 


- 


i 
Le 


ZMSDDO S11 L/™ DIAGNOSTIC MACRO MI1i3 14 JAN-82 16:15 PAGE 248 &wANTE 
“ECK *§OR KAMIKAZE MODE 
A680 0 6466 SUPDO1: SUBTST <<«SUBR EXECUTE PATTERN IN SUPERVISOR:-> 
§ POSSESS SESSSSSSSSSSESSSSESSSESESESSESESESESEESESEESSEEEESEEESEEEEEEEEEESEEE SE EEEEEEES 
;*SUC EST SUBR EXECUTE PATTERN IN SUPERVISOR 
FS SSSSSSSSSSSSSSESSSESSSSSESSEESSESSESESSESESSESSESSSESESEESEEEEESEESEEHESEEEEEEEEO HEHE EES 
8681 026466 MAP BANK sMAP SUPERVISOR SPACE (TEST AREA) TO BAN 
8682 026502 004737 055726 SUPDO2: CALL GETDIS 
8683 026506 PUSH SLPERR, $SLPADR 
6664 026516 010037 002154 MOV RO, SUPDRO 
8665 026522 012700 002156 MOV @SUPDR1 RO 
8686 026526 010120 MOV R1,CRO)- 
8667 026550 MOV R2,CRO)- 
8666 026532 010320 MOV R3,(RO)- 
010420 MOV R4,CRO)> 
0265 010520 MOV RS.CRO)> 
6691 026540 010620 MOV SP .CRO)> 
013700 002154 MOV SUPDRO , RO 
5 012737 026562 002564 MOV @TAG4$ , $SLPADR 
8694 026554 0135737 002564 002566 MOV SLPADR , SLPERR 
012700 002172 TAG4$: MOV @SUPDRE > 2, 
014006 MOV -(RO),SP 
6697 026570 014005 MOV -C(RO),RS 
6696 026572 014004 MOV -C(RO),R4 
99 026574 014003 MOV -€(RO),R3 
8700 026576 O01 MOV -(RO),R2 
1 026600 014001 MOV -(RO),R1 
702 026602 014000 MOV -C(RO),RO 
8703 026604 SUPERVISOR sENTER SUPERVISOR MODE 
8704 026612 012706 000740 MOV @SUPSTK.SSP 
8705 026616 104424 CACHOF F 3 TURN CACHE OFF 
8706 026620 004737 177640 CALL FASTCITY sCALL TO THE USER INSTRUCTION PAR’'S 
8707 026624 104423 CACHON 3 TURN CACHE ON 
8706 026626 104417 KERNEL sENTER KERNEL MODE 
8709 026630 000004 sc 
8710 026632 POP SLPADR , SLPERR 


D1 


CZMSOOO HSI i LUM DIAGNOSTIC — MACRO M1115 14 JAN-62 16:15 PAGE 250 is 


8714 026644 SUPDO3: MAP BANK sMAP SUPERVISC” SPACE “TEST AREA) TU BAN 

8715 026660 004737 055726 SUPDO4: CALL GETOIS 
026664 PUSH SLPERR , SLPADR 

717 026674 010037 002154 MOV . 
8716 026700 012750 002156 MOV 1,R0 
8719 026704 010120 MOV R1.CRO)- 
8720 026706 010220 MOV R2,(RO)-> 
8721 026710 010320 MOV R3.CRO)- 
8722 026712 010420 MOV 2(RO)> 
6723 026714 010520 MOV RS.CRO)> 
8724 026716 010620 MOV 2CRO)-> 
8725 026720 013700 002154 MOV . 
8726 026724 012737 026740 002564 MOV @7T8G4%, SLPADR 
8727 026732 0135737 002564 002566 MOV SLPADR , SLPERR 
6726 026740 012700 002172 TBG4$: MOV 2,R0 
8729 026744 014006 MOV -C€RO), SP 
6730 026746 014005 MOV -CRO).RS 
6731 026750 014004 MOV -CRO),R4 
6732 026752 014003 MOV -CRO),.RS 
8733 026754 014002 MOV -€RO),R2 
6734 026756 014001 MOV -C(RO),R1 
8735 026760 %14000 MOV -C(RO), 
8736 026762 TESTAREA sENTER SUPERVISOR MODE 
8737 026770 005737 002430 TST e 

738 026774 0014035 BEG & 
8739 026776 012706 000700 MOV @USESTK , USP 

740 027 BR 2s 
8741 027 012706 000740 18: MOV @SUPSTK ,SSP 
6742 027010 1 2s: C ;TURN CACHE OFF 
8743 027012 004777 153240 CALL SSUPDOADD 
8744 027016 104423 CACHON ;TURN CACHE ON 
8745S 027020 104417 KERNEL sENTER KERNEL MODE 
8746 027022 SCOPE 
8747 027024 POP SLPADR, SL PERR 
8748 027034 000207 RE TURN 


C 


MSi1 ./™ OITAGNOSTIC 


8772 027062 


8773 027062 


8784 027114 


8785 027114 


ZMSODO 
MEMOR: TEST PATTERN ROUTINES 


MACRO 1115 


- 


—= 


a 
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-SBTTL MEMORY TEST PATTERN ROUTINES 
§ POOSOSSSSSOSSSSESESESESSOSESEOSESESEEESEOEESESEEEEESEEEEEEEEEEEE EEE EEEEEEEEEEDES 


; PATTERN REGISTER CONVENTIONS 


$ RO FIRST ADDRESS OF PATTERN (FIRST .LAST+2,ETC) 
; Ri NUMBER OF ADDRESSES IN PATTERN (SIZE) 

3 R2 DATA FOR PATTERN (ONES,52525.ETC) 

; R3 COPY OF R1 CIF NECESSARY ) 

; R4 COPY OF RO CIF NECESSARY ) 

3 


RS COPY OF R2 (CIF NECESSARY) 
Pei ririviririsrriir iri rrrrivirrrrrrrrirerrrTitee 
MTPOOO: SUBTST <<MTPOOO BASIC DATA TEST>>» 


£ SSSSSSSSSSSSSSSSESESESESSSESSSESSSESSESSSESEESSESSSESESESESEEEEEEESEREEEEEEEEEOEEEEEEES 





; SUBTEST MTPOCO BASIC DATA TEST 
§ SSSSSESSHESK SESEESESESESEEESESESESESESSEESESEESESEEESEEESEEEEEEEEEEESESEEEEESEEES 
18: R2,CRO)> :V¥177640 
R1,.MTPOOO 3V¥177642 
3V177644 
2s: (R4)+¢,R1 3V¥177646 
R1,R2 3V¥177650 
3% 3V¥177652 
3V177654 
3V177656 
3%: R3.23 3V¥177660 
RE TURN 3V177662 
MTPOO1: SUBTST <<MTPOO] ADORESS TEST>> 


§ SFSSSSSSSSSSESESEESESHESESSSESSESEEHASEEEEESHSEEESOEOEEEESEEESEEESEEESEEEHERESEESEES 


;*SUBTEST MTPOO1 ADDRESS TEST 


£S SSSOSSSSASSSSSSSESSSSEEESESESEESESEEESESSSESEHESESEOSEOEEESESEESEEEESEEEEESEEEEEEEEEEEESE 


38: MGV R2,CRO)- 3V¥177640 
ADC @2. 3V¥177642 
S08 R1,38 3V177646 
NOP 3¥177650 
1%: MOV (R4)+- RO 3V177652 
CmP RO.RS 3V177654 
BEQ 2s 3V177656 
PERRO} 3V177660 
2s: ADO o2,R5 3V¥177662 
sos R318 3¥177666 
RE TURN 3V177672 
MTPOO2: SUBTST <<MTPOO2 COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP)>> 


§ SSSSSSSSSESESESSSSESESESAESESESSESESSEESEOSSEEESESASESSEEESEEESEEEEEEHEESEEEEEOOEE 


3; ©SUBTEST COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP) 
{ SOCSEOSSSSESSSEEESEHESSEEESESESEEEESOEEOEEEEESEEOEEEEEEEEEEEEEEEEEESEEEOEEESOEEES 
3%: MOV RS, -CRO) 3V¥177640 

ADO @2 RS 3V177642 

$98 R1, 3% 3V177646 

NOP 3V¥177650 
13: SUB 4 1V¥177652 

MOV (R4)+ R11 3V177656 

CMP Ri, 3¥177660 

BEG 2s 3V177662 

PERRO? 3V177664 
2s: S08 R3,18 3V177666 

RE TURN :V¥177670 


ZMSDDO MS11 ./M DIAGNOSTIC 
COMPL 


027146 


2 
B35 O27 D484 
8836 


EMENT ADDRESS TEST 


000100 


000100 


MACRO M1113 14-JAN-62 16:15 PAGE 254 
(WRITE DOWN, READ UP) 


MTPAOS: SUBTST <<MTPAOS 3 XOR 9 WORST CASE NOISE TEST (WRITE)>> 
5 PHSOOSOSESEEESOSEESESSESESESEEOEOESEEEEESEEOOEESEOEEEEEEEEEEESEEEOOOES EEE EEEEEES 


3; SUBTEST MTPAOS 3 XOR 9 WORST CASE NOISE TEST (WRITE) 


£ FS SSSSSSSESESSSSSSESSESSSSSSSSSSSESESSESSESESSESESESESSESSESESEESESSEEEEESESEESEEEKR OREO EES 


f 7. 4 Pe 


:Ri1 = ADDRESS 
sR2 = SMALL LOOP CONSTAN 
;R3S = NUM OF > TO TEST. (LARGE LOOP) 
:R4 = GOOD DATA 
385 = MEDIUM LOOP CONSTANT 
-ENABL LSB 
18%: MOV R4,(R1)-> 3V¥177640 
MOV R4,(R1)- 3V177642 
S08 R2,1% 3V¥177644 
COM R4 3V177646 
BIS CPC )+,R4 3V¥177650 
WARN2: 401 3V¥177652 WARNING LOCATION IS MODIFIED BEFORE LOADING 
MOV 04 ,.R2 3V¥177654 
S08 R5.,1$% 3V¥177660 
COM R4 3V¥177662 
BIS (PC )+,R4 3V177664 
WARNS: 401 3V177666 WARNING LOCATION IS MODIFIED BEFORE LOADING 
MOV 064. RS 3V¥177670 
S08 R3.,18 3V¥177674 
RE TURN 3V177676 
.OSABL LSB 
MTPBOS: SUBTST <<MTPBOS 3 XOR 9 WORST CASE NOISE TEST (READ)>> 


§ SOSSSSSOSS FSSSEHSSSESESSESSSESESESESEHEEEEASSHESSSESESESESESESESEEHEEEESEEEEEOHEES 


3; *SUBTEST MTPBOS 3 XOR 9 WORST CASE NOISE TEST (READ) 
5 OOSOSEOSOSESE SCESEEESEEEEEEEEEEEEEEEEEEEESEESEEEEEEEEEEEESEEEEOEEEEEEEOEEEDEDEEEEEESE 
LSB 
18: JP BenTPCOS 3V¥177640 GO TO v172360 
SOB R2.18 3V177644 
COM 3V177646 
BIs CPC )e ,R4 :V¥177650 
WARNS: 401 3¥177652 WARNING LOCATION IS MODIFIED BEFORE LOADING 
MOV #4 ,R2 3V177654 
$08 — 3V177660 
COM 31V¥177662 
BIS CPC). R4 3V¥177664 
WARNS: 401 3V¥177666 WARNING LOCATION IS MODIFIED BEFORE LOADING 
MOV 064. .R5 3V¥177670 
$08 R35,18 3V177674 
RE TURN 3V177676 
DSABL LSB 


Gl 


CZMSDDO MS11-L/M DIAGNOSTIC MACRO M1113 14-JAN-82 16:15 PAGE 256 QUEM 
MTPBOS 3 XOR 9 WORST CASE NOISE TEST (READ) 
8839 027246 MTPCO3: SUBTST <<MIPCO3 TEST DATA SUBPROGRAM> » 
FS SSSSSSSSSSSSSSSSSSSESSSESSESSESSESSSSSSSSESESESSESESSEESESESEEEEEESEEHEHEEE HE EEOEEEEES 
; ¢SUBTEST MTPCOS TEST DATA 
SS SSSSSSSSSSSSESSSESSESSESSESSSESSESSSSESSSSSSESSESSESSEEESEESESSEEEEESEOEEEOSHEEEEEEEEE EO EEEE 
8840 027246 020421 CMP R4,(R1)+ ;V172360 
8841 027250 001401 BEQ is :V172362 
8842 027252 104431 PERROS 3V172364 
8843 027254 00514! 1s: COM -(R1) 3V172366 
8844 027256 005111 COM (R1) 3V172370 
9645 027260 000137 027264 JMP @eMTPDOS 1V172372 GO TO v172260 
6847 027264 MTPDO3: SUBTST <<MTPDO3 TEST DATA SUBSUBPROGRAM> > 
£S FSSSSSSSSSSSSSSSESSSSSSSSASSESESSESSESSESSEESSSESEEESSEEEEESESOSEEEEEHEHEEEEEEEEEEEEEEE 
; *SUBTEST MTPDO3 TEST DATA SUB 
FF SSSSSESSSSSSSSSSSSSSESESEESESSESSESESEEESSEESESEESESESESEESEEHEESEEEESHEESESESEEESEEESHESE 
8848 027264 020421 CMP R4,(R1)> ;V172260 
8849 027266 001401 BEQ is :V172262 
8850 027270 104431 PERROZ ;V172264 
8851 027272 005127 1$: COM (PC). :V172266 
8852 027274 000000 0 3V172270 
8853 027276 001363 BNE MTPCO3 ;Vi72272 GO TO v172360 
8854 027300 000137 027212 JMP QOMTPBO3+4 :V172274 GO TO v177644 


CZMS0D0 
MIPDOS 
8857 


MS11 ./M DIAGNOSTIC 
SUBSUBPROGRAY 


TEST DATA 


027304 


027410 
027412 


027340 
177776 


027320 


000010 


027340 
177776 


MACRO 1115 


MTPAO4: SUBTST 
§ FP SSSSSSSSSSSSSSSSSSSSSESSSESSESSESSESESESEEEEEEEEEESEEEEEEEEEEEEEEEEETEEHEHEH EH EHEES 
3; *SUBTEST 


1%: 


23: 
3%: 


MTPBO4: 


MOV 
c.c 


8 


SUBTST 


Hi 
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<<MTPAOG 


ROTATING ZEROS TEST>>» 
MTPAO4 ROTATING ZEROS TEST 


ROTATING BIT>> 


F SSSSSSSSSESSSSESSSSESSSESSESSESSESSSSESESESSESASHESHSSESESOSSESEEHSEEESESESESEEHEEEEE HE SEEEEEE 
; *SUBTEST 


§ FSSSSSSESSESSSSSSSSESHESESEESSEESESSEESESESESSESEESEEEERSESEEOSESEEESEEESEEESEEEEEEEESDEEE 


1%: ROLB 
S08 
ROLB 
2s: ROLB 
S06 
ROLB 
JP 
MTPOOS: SUBTST 
3s *SUBTEST 
1s: MOV 
MOV 
SEC 
PP 
MOV 
Bcc 
CMP 
BEQ 
2s: PERRO4 
3$: $08 
RE TURN 


26. RS :V¥177640 
. 3V177644 
3V177646 
T 3V¥177650 

-2(RO) 24 ;V177654 
2s 3V177660 
R2,R4 3V177662 
3¢ 3V¥177664 

3V¥177666 
R1,1$% :V¥177670 

3V¥177672 
< <MTPBO4 SUBR 
MTPBO4 SUBR ROTATING BIT 
(RO) ;V172360 
R518 3V172362 
CRO) 3V172364 
CRO) 3V172366 
R428 3V172370 
CRO) :V172372 
BOMTPA04 +14 3V172374 
<<MTPOOS 


ROTATION ONES TEST>> 


§ FSSSSESSSSSSESASSSESSESESESESSESEESSSESESSEESEESESESEEESESESEEEEHEEEEEHEEESEEEEEEEOEE 


MTPOOS ROTATION ONES TEST 


§ SSSSSSSSSSSEASESESESESSSSESSHESSESESHSESSSEEESEESSESESEESEEEEEEEEEESEEEEEEEEEEEEEEEEE 


3V¥177670 
3V177672 


IF THIS HAPPENS THE GOOD € BAD MATCH 


C 


MS11 ./M OIAGNOSTIC 


8893 027414 


32 027610 
8933 027612 


012737 
005037 


000746 


ZMSDDO 
MTPOOS ROTATION ONES TEST 


177776 
177777 
002236 
002240 
000000 
002236 


002240 


MACRO 1115 


002256 


MTPOO6: SUBTST 


I] 
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<<MTPOO6 


SEQUENCE 


INITIAL DATA TEST>>» 


;¢SUBTEST MTPOO6 INITIAL DATA TEST 
f POSS SESESSESSESOSESEESEESSEEEOOEEOEEEEEEEEESEEEEEEEEESEEEEEEEEEEEEEEEEEEEEEEEEES 
THIS TEST CHECKS THE te LINES BY 
SHIFTING A 1 THROUGH THE WORD. 
MOV él. DATBUF SET THE FIRST TEST BIT 
CLR DATBUF «2 ;CLEAR 2ND WORD 
1%: MOV DATBUF .a(R1) S WRITE TEST WORD 1 
MOV DATBUF +2,.82(R1) ;AND TEST WORD 2 
MOV @(R1),R2 
CMP DATBUF ,R2 ;NOW READ THEM 
BEQ es :;BR IF FIRST 16 OK 
PERRO? sERROR TRAP 
2s: MOV B2(R1),R2 
CMP DATBUF -2,R2 sNOW READ SECOND WORD 
BEG 38 ;8R IF OK 
PERR10 ;sERROR TRAP 
3%: TST DATBUF -2 sHAS LAST BIT BEEN TESTED ? 
BMI 4% sMINUS MEANS BIT 31 
DOLEFT DATBUF sNO, SHIFT TEST BIT LEFT 
is ;GO WRITE NEW TEST DATA 
sNOW GOING TO SHIFT A O IN DATA DIRECTION 
4%: MOV €177776,0ATBUF ;PUT AO IN BIT 
MOV @-1, DATBUF +2 s;AND 1‘'S IN ALL OTHERS 
5$: MOV DA ° sWRITE THE DATA 
MOV DATBUF +2,@2(R1) :;2 WORDS WORTH 
MOV @CR1),R2 
CMP DAT P 3s NOW ya FIRST WORD 
BEQ 6% ;8R IF 
PERRO? 
6%: MOV 82(R1),R2 
CMP DATBUF «2,R2 sNOW, READ SECOND WORD 
BEQ 78 ;BR IF OK 
PERRIO 
7$: TST DATBUF +2 :TESTED BIT 31 YET? 
BPL. 8% ;BR IF YES, WE'RE DONE 
OLEFT DATBUF 
5% sKEEP GOING 
8%: RE TURN 


8936 027614 


96 700 
8970 027702 
8971 027704 
8972 027710 
8973 027712 


INITIAL 


ZMSODO MSi1 ./™ DIAGNOSTIc 


DATA TEST 


MACRO 1115 


MTPOO7: SUBTST 


Ji 
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<<MTPOO7 


7E GULNCE 


ADDRESS SIT TEST>>» 


; SUBTEST MTPOO7 ADDRESS BIT TEST 
FF SSSSSSSSSSSSESSESSSSSSESSSESSSSSSSSSSSSESSSSSESESSESSEESESESESEEESSECASESESEEEOEEOHOEES 
; THIS TEST CHECKS TO SEE THAT EACH ADDRESS 
3 BIT IN EACH 16K BANK CAN BE ASSERTED UNIQUEL,. 
3 IT CHECKS FOR ADDRESS BITS THAT MAY BE STUCK 
Lies - HIGH, STUCK LOW OR STUCK TOGETHER. 
TSTB RO ;READ AND COMPARE FOR ZEROS 
Q is : IF OK 
PERR11 
1%: COMB ) ;COMPLEMENT THE BYTE 
MOVB CR1),RO 
TSsTB RO sREAD FOR NON ZEROS 
2s ;BR IF OK 
PERR12 
2s: BIC R2,R1 sMASK OFF THE ASSERTED SIT 
ASL Re ;SHIFT R2 FOR NEXT BIT 
BIS R2,R1 ;SET THE NEW BIT INTO R1 
MOV CR1),RO 
TST RO ;READ THE NEW ADDRESS 
BEQ 33 ;READ FOR ZEROS 
PERR13 
3%: COM CR1) ;COMPL THE WORD 
MOV C(R1),RO 
TST RO sREAD IT AGAIN 
BNE 43 
PERR14 
4%: CMP #100000 ,R2 
BEQ $ 
CMP #10000 ,R2 ;CHECK FOR MSB IN 4K BANK 
og 4 sNOT LAST BIT, BRANCH 
MOV #160000 ,R1 
BR $ 


5%: 


= 


000004 
177777 
177777 


177777 


177777 
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Kl 
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<<MTPO10 BYTE ADDRESSING TEST>>» 


FF SSSOSSSSSSSSSSSSSSESSSSESSSESSSSSSSSSESEESSSSEESEESEESEESEEEEEEEEEEEEEE EE EEREHEHS 


; ¢SUBTEST 


MTPO1O BYTE ADDRESSING TEST 


1%: 
2s: 


3%: 
4$: 


S$: 
6%: 


;TEST 3 THIS TEST CHECKS FOR PROPE 
BYTE ADDRESSING WITH ECC oS ee 


3 
R4,R2 ;R4 HAS LOWEST 
R4 RS ;PUT IT IN R3 ALSO 
04 ,R2 sPOINT R2 TO LAST BYTE +1 
@-1,(R3) sWRITE ALL ONES IN 
@-1,2(R3) ;THE 4 TEST BYTES 
(R3) ;CLEAR A BYTE 
R4,R1 s INITIALIZE Ri FOR EACH PASS 
R2,R1 ;IF EQUAL, JUST READ LAST BYTE 
6$ 7BR IF EQUAL 
> sIS THIS THE BYTE OF ZEROS 
;BR IF NOT 
MOVE CRI )»,RO 
;WARNING IF YOU OPTOMIZE CHANGE THE PCBUMP FOR THIS ERROR INCASE OF TRAPS 
CMP * aa ;IT IS, COMPARE FOR ZEROS 
Ri ;NEXT BYTE 
os ;RE TURN 
CR1),RO 
—— ;ITS NOT THE BYTE OF O'S, READ 1'°S 
$ 
- sMOVE ~O NEXT BYTE 
@-1,(R3) sRESTORE 1'°S TO BYTE JUST TESTED 
R3 sINC TO NEXT BYTE 
R3,R2 ;WAS THAT JUST THE LAST ONE? 
1% ;8R IF NO 


9012 


CZMSODO S11 -./M DIAGNOSTIC 
MTPO1O BYTE ADDRESSING TES’ 


030022 


012737 
005037 


012737 
005037 


013737 


013715 
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172246 


002236 


002246 


002242 
002244 


002274 


MTPO11: SUBTST 
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<<MTPOLIL 


is 


oe aS me 


SINGLE BIT ERROR TEST>>» 


5 OPPOSE SSSEOEEEESS SESSSSEEESSEEEEEEEEEEEESESOESEOEEEEOEEESESEEEEEEEEEEE REESE EEE EHES 
; SUBTEST 


FS SSSSSSESSSSSSSSESSSSSSESSSESSSSSSSSSESSEESSESSESSESSESSEESEESEESESESSESEEEEESEHEOOEESESESE 


MTPO1L1 


SINGLE BIT ERROR TEST 


3(€1) CREATE A SINGLE BIT ERROR 
3 
3(2) READ BACK SBE UNCORRECTED (WITH ECC DISABLE ) 
: 
3(3) ENABLE ECC € READ CORRECTED DATA 
: 
3(€4) CHECK THAT THE SBE FLAG WAS SET FROM THE LAST READ 
3(5) DO (1-4) FOR DATA CONSISTING OF 1 BIT SET IN EACH OF 32 
; POSITIONS OF A DOUBLE WORD 
; THEN DO IT AGAIN FOR 1 BIT CLEARED IN EACH OF 32 POSITIONS OF 
: A DOUBLE WORD 
3 IE (64 TIMES) 
: 
3(6) DO (1-5) FOR A SBE IN EACH OF 32 BIT POSITIONS 
IE CRUN TEST 64 « 32 = 2048 TIMES) 
CLRiCSR ;CLEAR 1 SELECTED CSR 
TST PHEBE 3 TEST we CASE INDICATOR 
BEG MTLALI ;BR F NOT SET 
MOV SIPARS ,R2 ; SAVE CONTENTS OF SIPAR 03 
MOV SIPARS ,@@SIPARS ;COPY CONTENTS OF @5 INTO @3 
MOV R2.,BOSIPARS ;COPY CONTENTS OF 63 INTO 05 
;8IG LOOP 
MTLAL1: MOV 61 ,DATBUF s INITIAL DATA 
DA 4 332 BITS WORTH 
sMEDIUM LOOP 
MTLB11: MOV #1, SBEMSK ; INITIAL ERROR MASK 
fe SBEMSK +2 332 BITS WORTH 
sLITTLE LOOP 
MTLC1i: MOV DATBUF . TSTOAT 
DATBUF +2, TSTOAT «2:10 SAVE ORIG DATA 
TST8 PASFLG ; COMP DATA ON SECOND PASSONL Y 
BEa 4% ;BR IF FIRST PASS 
COM TSTDAT ;SECOMD PASS, COMP BOTH WORDS 
COM TSTDAT +2 
43: MOV TSTDAT ,R2 
MOV TSTDAT+2,R3 
MOV @TSTDAT,.SOURCE ;SET UP ADDRESS FOR CHKGEN 
CALL CHKGEN ;GEN CHECKBITS ON TSTDAT 
§ O466686646666666 6668668606666 666 
3;#@ CREATE A SINGLE BIT ERROR ee 
§ 20980686 666668660606666466666366666 
XOR Ri, TSTDAT 
MOV SBEMSK+2,R1 
xOR R1,TSTDAT +2 
MTLDi1: MOV TESTADO,R1 sFIRST TEST ADDRESS 
MOV TESTADD+2,R5 sSECOND TEST ADDRESS 
ECCiDIS sDISABLE ECC ON 1 SELECTED CSR 
MOV TSTDAT,(R1) ;sWRITE FIRST 16 BITS 
CBiCSR sWRITE GENERATED CHECKBITS IN 1 SELECTED CSR 
MOV TSTDAT+2,(R5) sWRITE SECOND 16 BITS AND 


;CHECK BITS. WE NOW HAVE CHECKBITS 


010157 
104460 


104503 
011500 
020003 
001401 
104456 


104510 
103411 


010157 
104460 


002032 


013140 


002032 
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6$: 


7$: 


17%: 


9%: 


10%: 


les: 


14-JAN-62 16: 


ECCiOIS 


MOV 
PERR31 


CRS),RO 
RO, TSTDAT+2 
7% 


RS .ADDRESS 


If KFLAG IS FALSE 


E 

END; OF IF OBITS 
END; OF IF KFLAG 
TST 

17% 

CLRICSR 
MOV (R1),RO 
CMP RO,R2 
BEQ 8s 
PERRZ2 
TSTREAD 
ecs 4 
SET 
MOV 1, ADDRESS 
PERR34 
SET HEADER 
CLRICSR 
MOV CRS),RO 
CMP RO,R 
BEG 10$ 
PERR 32 
TSTREAD 
ecs 11% 
SET HEADER 
MOV R1, ADDRESS 
PERR34 
SET HEADER 
TSTs PASFLG 
BMI 158 
TST SBEMSK +2 
BMI 128 
OLEFT 


JE QUE NCE 


;GENERATED ON DATBUF AND DATA WITH 
;ONE BIT IN ERROR (AS PER SBEMS*). 
;DISABLE ECC ON 1 SELECTED CSR 


sREAD THE LOW WORD (UNCORRECTED ) 
;8R IF OK 


sREAD THE HIGH WORD (UNCORRECTED) 
;BR IF OK 


READCSR 
IF @8IT4 OFF .IN CSR OR OBITIS OFF .IN CSR 
RROR +4 


;CLEAR 1 SELECTED CSR 
;SEE IF ITS aan — 
;IT SHOULD HAVE BEEN 


sTEST LOC (R1) E TST FOR SBE C WITHOUT FETCHES) 
;BR IF IT IS SET 


sENABLE PRINTING OF ERROR HEADER INFO 


sENABLE PRINTING OF ERROR HEADER INFO 
sCLEAR 1 SELECTED CSR 


;SEE IF ITS BEEN CORRECTED 
;BR IF OK 


Fig Nel € TST FOR SBE (WITHOUT FETCHES) 
‘ 
sENABLE PRINTING OF ERROR HEADER INFO 


sENABLE PRINTING OF ERROR HES 7% INFO 
ADDRESS 


s TEST ERROR 


sTEST FOR LAST MASK BIT 
sMINUS MEANS BIT 31 


BR MTLCi1 
IF @SW1il SET.IN @SWR THEN GOTO 153% 


MS11-./" oeaeeet Ic 


CZMSODO 
MTPO11 SINGLE BIT 


9143 030572 
9144 
4 gy 030576 


9150 030616 


ERROR TEST 


002240 


002366 
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138: 


002260 14%: 


002276 15%: 


16%: 


Ni 
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If QVFLAG IS TRUE THEN GOTO 13% 
Ts DATBUF -2 


T sLAST DATA BIT ? 
I 13% ;WHICH IS BIT 31 
DLEFT  DATBUF 
JP MTLB11 
TSTB PASFLG ;FIRST OR SECOND PASS ? 
BNE i4$ ;NON ZERO MEANS WE'RE DONE 


INCB PASFLG ;NOT DONE . GO 00 SECOND PASS 


JP MTLAL1 

BIS @BIT7,.PASFLG 
CLR R2 

CLR R3 


CLR TSTDAT 
CLR TSTDAT+2 
040 ,R4 


MOV 03740, CHECK 
XOR R4, CHECK 


ASL R4 

BIT @BIT13,R4 

BNE 16% 

JP MTLD11 

;CLEAR OUT ANY DOBE’S OR SBE'S 

ECCi0IS sDISABLE ECC ON 1 SELECTED CSR 


CLRiCSR ;CLEAR 1 SELECTED CSR 
RE TURN 


031010 
031016 


010137 
104017 
111100 
122700 


001414 
104457 


104510 
103771 
010137 
104460 


132712 


177777 
002502 


177777 
002032 


177777 


002032 


177777 
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SUBTST 


> 


/¢ 


<<MTPOL2]? 


1S PAGE 268 


Van 


WRITE BYTE CLEARS SBE TEST>- 


§ FSSSSSSSSSSSSSESSSSESSESSSSSSSESSSSSSESSESEEESESSESESSSESEESCEOOOEESEEESESE e@eeeeeeeeeeeee 
3; *SUBTEST 
§ POSSOSSSESSSSSSESSSESESESSSSESEEESEESEEEEESEESEEEEEOEEEEEEEEEE SESE SESE EEEEEEEEEEES 


sSINGLE BIT ERROR TEST TO INSURE THAT A WRITE 


38: 


4%: 


58: 


6&: 


78: 


CLRICSR 
MOV 


MOV 
CLR 


33535338 


mn 
a88 
$ 5 
w 


Ragga 288 


~ 
° 
3 


annage 
: ‘‘ 


sBYTE CLEARS a BIT 








MTPOI2 WRITE BYTE CLEARS SBE TEST 



















SBEMSK +2 
DATBUF , TSTDAT | SAVE ORIGINAL DATA 
DATBUF -2, TSTDAT+2;B0TH WORDS 
@TSTDAT.SOURCE ;NEED ADDRESS FOR CHKGEN 
;GENERATE CHECK BITS 
SBEMSK .R1 
R1, TSTDAT 
SBEMSK +2 ,R1 
R1, TSTDAT+2 
TESTADO ,R4 sFIRST TEST Ret y 
R4 Ri sPuUT IT IN RL ALSO 
sDISABLE ECC ON 1 SELECTED CSR 
TSTDAT .(R1) | WRITE 16 BITS 
sWRITE TED CHECKBITS IN 1 SELECTED CSR 
RS .R1 s INDEX UP TO SECOND WORD 
TSTDAT+2,(A1) {WRITE MIGH WORD-CHECKBITS 
CLEAR SR 
@SBEMSK , 
RS RL 
LAG sIS THIS MF11S-« 
a sBRANCH IF NWOT - IT'S MS1LI-M 
@-1,(R2) }DID THIS BYTE HAVE *© BAD BIT IN IT? 
3NO BRANCH 
56 TEST ~ 5 CR1) € TST FOR SBE (WITHOUT FETCHES) 
HEADER sENABLE PRINTING OF ERROR HEADER INFO 
oe 
HEADER sENABLE PRINTING OF ERROR HEADER INFO 
CR1L),RO 
®-i, sCHECK DATA 
7$ : IF OK 
sTEST LOC (RL) E TST FOR SBE (WITHOUT FETCHES) 
sREAD THE BYTE 
;SBE ERROR BIT OMY SET ? 
S$ sSHOULD BE SET. BR IF Ox 
HEADER s ENABLE PRINTING OF ERROR HEADER INFO 
Ri, ADORESS 
HEADER sENABLE PRINTING OF ERROR HEADER INFO 


@-1,(R2) 


sCHECK FOR LAST BYTE 


MS1i 0/7" DIAGNOSTIC 


WRITE BYTE 


001012 
005202 


CLEARS SBE 


002240 


93: 


10%: 
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sMOVE TO NEXT Brie 
sFIRST TEST ADDRESS 
: TEST FOR LOWER WORD 


:BR IF IT‘S (OW 16 BITS 
sADJUST POINTER FOR ERROR REP’. 


;LAST ERROR BIT 
:MINUS MEANS BIT 


2s 
IF @SWll SET.IN @SWR THEN GOTO 10% 
IF QVFLAG IS TRUE THEN GCTO 108 


sLAST DATA BIT? 
sMINUS + BIT 31 


oo 
sOISABLE ECC ON 


;sCLEAR 1 SELECTED CSR 


TST DATBUF +2 
BNI 10% 

OLEFT — 
;CLEAR OUT ANY DBE’S OR SBE 
ECCiOIS 

MOV TESTADO.R1 
CLR (RL) 

ADO RS .R1 

CLR (R1) 
CLRICSR 

RE TURN 


? 
31 


1 SELECTED CSR 











CZMSO000 S11 ./M DIAGNOSTIC MACRO M1115 14 JAN-82 16:15 PAGE 270 EQ aN 
“TPOI2 WRITE BrYTt CLEARS SBE TEST 

9235 031206 MTPOLS: SUBTST <<MTPOLS CREATE DOUBLE BIT ERROR TEST... 
§ PF SSSSSSSSSSSSSSSSSSSESSSSSSESSESSSSSSSSESESSESSESSESSESESSOSESSESOESEESEEEESEEOEESEFESEEEES 
;*SUBTEST MIPOLS CREATE DOUBLE BIT ERROR TEST 
§ FOSS SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSHSSSSESSSSESESSESESSESSESESOHSEOOESESEEEESO EE EEESS 

92 36 sO0UBLE BIT ERROR FORCE TO CHECK DOUBLE ERROR LOGIC 

9237 031206 104505 CLR: CSR sCLE@R 1 SELECTED CSR 

9236 O351210 012701 002364 MOV @TESTADD.®1 

9239 031214 005037 0022356 1s: CLR DATBUF sMAKE INITIAL DATA 

9240 031220 005037 002240 Ci.R ; 

9241 O351224 012737 900001 002246 2%: MOV s INITIAL SINGLE ERROR MASK 

9242 031232 005037 002250 CLR sSECOND WORD 

9243 031236 012737 000001 002252 5%: “Ov sINITIAL DOUBLE ERROR MASK 

9244 031244 0050357 002254 CLR 332 BITS MERE ALSO 

9245 031250 0135737 002236 002242 43: ; 

9246 0351256 015737 002240 002244 MOV DATBUF +2, TSTDAT +2 

9247 031264 105737 002260 TST8 PASFLG ;NO COMPLEMENTING FIRST PASS 

9246 031270 001404 BEG S$ 

9249 O31272 0051357 002242 COM TSTDAT sCOMP FIRST WORD 

9250 031276 0051357 002244 COM TSTDAT +2 sSECOND WORD 

9251 031302 104505 S$: sCLEAR 1 SELECTED CSR 

9252 031304 025737 002246 002252 — OBEMSK iCAN' T HAVE THE SAME ERROR BIT SE’ 

9253 0 1 3IN BOTH MASKS 

9254 031514 023737 002250 002254 SBEMSK +2 2. OBEMSK +2; COULD BE EQUAL IN SECOND WORD 

9255 031322 001460 13% sGO MAKE THEM NCT EQUAL 

9256 031324 012737 002242 002274 63: @TSTDAT,SOURCE ;SOURCE ADDRESS FOR CHKGEN 

9257 031332 004737 041724 CHKGEN :G0 GENERATE CHECK BITS 

9256 031336 013702 

9259 031342 074237 002242 

9260 031346 013702 002250 

9261 0351352 074237 002244 

9262 031356 013 

92635 031362 074237 002242 

9264 031366 013702 

9265 031372 074237 002244 R2, TSTOAT +2 

9266 031376 104471 168: sOISABLE a ks ON 1 SELECTED CSR 

9267 031400 013731 002242 TSTOAT ,@(R1)- sWRITE 16 BITS 

9268 0 *'S sWRITE GENERATED CHECKBITS IN 1 SELECTED CSR 

9269 031406 013771 002244 000000 TSTDAT+2,@(R1 ) SWRITE HIGH WORD 

9270 031414 104503 sCLEAR 1 SELECTED CSR 

9271 031416 162701 000002 @2,R1 sADJUST TEST ADDRESS 

9272 031422 005771 000000 ac Ri) sREAD THE LOCATION 

9273 031426 104501 ;MAS THERE ANY oe BIT ERRORS ON 1 SELECTED CSR 

9274 0314350 103411 9% sIT SHOULD BE SE 

031432 HEADER 
9276 031440 011137 002032 (R1)>, ADDRESS 
9277 031444 104030 ° 30 





HEADER 


ZMSOOO “S11 ./™ DIAGNOSTIC 
CREA 


Te 


9321 031716 
9322 031720 


1046512 
105737 
100452 
005737 
100405 


002260 
002254 
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DOUBLE BIT ERROR TEST 


9s. 


158: 


10%: 


1158: 


12s: 


148: 


15%: 


‘ 
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L 


ERRGEN 

TST8 PASFLG 

BMI 145 

TST OBEMSK +2 sCHECK MASK FOR LAST BIT 
BMI 10% sMINUS + BITS1 

OLEFT OBEMSK 


BR at 
IF @SWil SET.IN @SWR THEN GOTO 118 
IF QVFLAG IS TRUE THEN GOTO 118 


TST SBEMSK +2 sCHECK SINGLE ERROR MAS* TOO 
BMI 118 s6R IF DONE 

OLEFT ## SBEMSK 

BR 38 

TST8 PASFLG ;FIRST PASS 

BNE i2s sNON ZERO MEANS WE'RE DONE 
INCB PASFLG ;FIRST PASS, NOT DONE 

;CLEAR OUT ANY DBE'S OR SBE'S 

BR is sKEEP GOING 

BIS @6IT7,PASFLG sSET UP FOR CHECK BIT TEST 
CLR TSTOAT 

CLR 

MOV 

MOV 

MOV 

MOV 

xOR 

MOV 

xOR 










ASL 
BIT *6IT15,. DBEMSK 
BEG 168 








ASL SBENSK 

BiT @61T11. SBENSK 

BNE 153 

MOV SBEMSK , OBEMSK 

ASL OBEMSK 

BR 148 

ECCiOIS sOISABLE ECC ON 1 SELECTED CSR 
MOV @TESTADO,R1 

CLRICSR sCLEAR 1 SELECTED CSR 


RE TURN 


" 
c 
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MTPOLS CREATE DOUBLE BIT ERROR TEST 

9325 031722 MTPO14: SUBTST <<«MTPO14 WRITE INHIBIT DURING DATIP with OBE TEST>> 
FS SSSSSSSSSSSSSSSSSSSESSSSSSSESSSSESSSHSSESSSESSESESSESSSESSSEHESESEOESEEEEEOESESEEEEEESE 
; SUBTEST MTPO14 WRITE INHIBIT DURING DATIP WITH OBE TEST 
§ SO SOSSSSSSSSSSSSSSSESSSSSESSSSSOSSESSSSESSEESSOSESSESESSESEOESEESESEESESESEEEEEEEEESEEE 

9326 sTHIS TEST CHECKS THE WRITE INHIBIT ON DOUBLE 

9327 sBIT ERRORS DURING A DATIP OPERATION BY USE 

9326 s0F AN ‘ASRB’ INSTRUCTION. 

po 031722 IF KFLAG IS TRUE THEN SRETURN 

9 

9336 sNOTE- THIS TEST WILL ONLY BE RUN FOR MF11S-K MEMORY. 

9337 031732 005037 0022% i$: CLR DATBUE s INITIAL DATA 

9336 031736 005037 002240 CLR 32 WORDS WORTH 

9339 031742 012737 000001 002246 2%: MOV s INITIAL ERROR MASK 

9340 031750 005037 002250 CLR i 

9341 0351754 012737 000001 002252 53%: MOV sO0UBLE ERROR MASK 

9342 031762 005037 002254 CLR :2 WORDS 

9343 0351766 013737 002236 002242 43: MOV ; PRESERVE ORIG DATA 

9344 031774 013737 002240 002244 MOV DATBUF «2, TSTDAT +2 

9345 0 105737 002260 TST8 PASFLG SECOND PASS YET ? 

9346 0 001404 BEG S$ sBR IF NO 

9347 032010 005157 COM TSTOAT sCOMPL DATA ON SECOND PASS 

9346 052014 005137 002244 COM TSTDAT +2 

9349 032020 1045035 S$: CLR1ICSR sCLEAR 1 SELECTED CSR 

9350 032022 0235737 002252 002246 cup OBEMSK , SBEMSK sCHECK FOR SAME MASKS 

93551 032030 001004 BNE BR IF OK 

032032 023737 002254 002250 CMP 

9353 032040 001476 BEQ sBR IF THEY'RE EQUAL 

93534 032042 012737 002242 002274 6%: MOV sSET UP ADDRESS FOR CHKGEN 

9355 032050 004737 041724 CALL sGENERATE CHECK BITS 

9 032054 015701 MOV 

9357 032060 074137 002242 XOR 

9356 0352064 013701 002250 MOV SBEMSK +2 ,R1 

9359 074137 002244 xOR R1, TSTDAT+2 

9360 032074 013701 002252 MOV OBENMSK .R1 

9361 032100 074137 002242 XOR R1, TSTDAT 

9362 032104 015701 002254 “Ov DBEMSK +2 ,R1 

9363 032110 074137 002244 XOR R1, TSTDAT+2 

9364 032114 012701 002364 78: MOV @TESTADO.R1 sTEST ADDRESS 

9365 032120 104471 ECCioIs DISABLE ECC on 1 SELECTED CSR 

9366 032122 013731 002242 MOV TSTDOAT ,@CR1)- MATTE FIRST 16 BIT 

9367 032126 1 CB1CSR E GENERATED aaeeetes IN 1 SELECTED CSR 

9368 0352130 013771 002244 000000 MOV TSTDAT+2,@(R1) SECOND 16 BITS-+-CHECKBIT 

9369 052136 1 7 002261 CLAS UPPFLG ICATE LOWER WORD 

9370 032142 013703 002364 MOV TESTADD RS iTEST ADORE SS 

9371 032146 104503 8$: CLRiCSR sCLEAR 1 SELECTED CSR 

9372 032150 1 3 ASRB CR3)- ; SPECIAL DATIP INSTRUCTION 

9373 032152 015100 MOV 8-(R1),RO 

9374 032154 023700 002242 chp TSTDAT ,RO sCHECK FOR UNCHANGED DATA 

9375 032160 001404 BEQ i D BE UNCHANGED 

9376 O352162 017137 000000 002032 MOV @(R1), ADDRESS 

cate 032170 104455 PERRS1 

9379 032172 062701 000002 98: ADO @2,R1 sPOINT TO UPPER WORD 

9380 652176 017100 000000 MOV @C(R1),RO 

9381 032202 023700 002244 CMP TSTDAT+2,R0 sREAD IT 

9382 032206 001404 BEG 10% sBR IF UNCHANGED 

93863 032210 017137 000000 002032 MOV a(R1), ADDRESS 


ZMSOD0O S11 


032216 


104455 
122737 


/™ DIAGNOSTIC 
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108: 


i2$s: 


148: 


158: 


168: 


PERRS1 
23, UPPFLG ;LOWER WORD 

BEG i1s% :BR IF NO 
INCB UPPFLG 
BR 8s 
TSTB PASFLG 

I 15% sBRANCH If WE'RE TESTING CHECK BITS 
TST OBEMSK - 2 ;LAST BIT - MASK ? 

I l2$ ;BR IF BIT 31 
DLEFT —_— 


IF @SW11 SET.IN @SWR THEN GOTO 1538 

IF QVFLAG IS TRUE THEN GOTO 13% 

TsT SBEMSK +2 sLAST a SINGLE ERROR MASK ? 
Y 





I 15% ;6R IF 
OLEFT _ 
TSTB PASFLG ;WHICH PASS 
4s ;8R IF WE'RE DONE 
PASFLG ;INDICATE SECOND PASS COMING 
;CLEAR OUT ANY DBE’S OR SBE'S 
1% 3GO 00 IT! 
@BIT7,.PASFLG 
TSTDAT 
TSTOAT +2 
40, 
#100 , DBEMSK 
€3740, CHECK 





SBEMSK ,R2 

R2, CHECK 

Ro. CHECK. 
OBEMSK 
e81T15, DBENSK 






ASL SBEMSK 
BIT oe 






BNE 

MOV SBEMSK , DOBEMSK 

ASL OBEMSK 

BR 15s 

ECC10IS ;DISABLE ECC ON 1 SELECTED CSR 
@TESTADO,R1 

CLEAR @(R1)+,a(R1) 

CLRICSR sCLEAR 1 SELECTEO CSR 


ts ONC 


™ DIAGNOSTIC MACRO M1i15 14 JAN-82 16:15 PAGE 276 EGAN 








CZMSODO A4S1i i 
“TPOLS mite IN TIBI, DURING DSTI WIT OBE TES? 
9433 052504 MTPO1S: SUBTST <<«MTPOLS WRITE INHIBIT OF BrTE with DBE -. 
{ FSSSSSSSSSSSSSHSSSSESSSSSSESSSESSESSSSSSSSESHSSSSSEOSSSOSHSSSEEEEEEEEEEEEEREE EEE ERED 
3; @SUBTEST MTPO1S WRITE INHIBIT OF BITE WITH OBE 
FS SSSSSSSSSSSSSSSSSSSSSSESSSSSSESSESSESSSSSESESSSSSSESESEEESEESEEEEEEEEHEEEHEEEEEEEEEEES 
4444 :CHECK FOR WRITE INHIBIT DURING A WRITE Brite. 
9435 ;CHECKS FOR UNCORRECTED DATA. 
9436 032504 005037 0022% 15%: CLR DATBUF s; INITIAL DATA 
9457 032510 005037 002240 CLR ;32 BITS WORTH 
9436 032514 012737 O00001 002246 2%: MOV ;SINGLE ERROR MASK 
9439 032522 005037 002250 CLR 5 
9440 032526 012737 000001 002252 3%: MOV a ERROR MASK 
9441 032534 005037 002254 CLR 
9442 032540 013737 002236 002242 43: MOV S PRESERVE ORIG DATA 
9443 032546 013737 002240 002244 MOV DATBUF «2, TSTDAT +2 
9444 052554 105737 002260 TSTB PASFLG ; WHICH PASS ? 
9445 032560 001404 BEQ 5s sFIRST PASS, NO COMPLEMENTING 
9446 032562 005137 002242 COM TSTDAT 
9447 032566 005137 002244 COM TSTDAT+2 sSECOND PASS, COMPLEMENT TSTDAT 
9446 032572 1046505 S$: CLRICSR ;CLEAR 1 SELECTED CSR 
9449 032574 023737 002246 002252 CMP SBEMSK , OBEMSK ;CHECK FOR SAME MASKS 
9450 032602 001004 BNE 6% ;8R IF NOT EQUAL 
9451 032604 023737 002250 002254 CMP SBEMSK «2 ,OBEMSK -2 sSECOND WORD ALSO 
BEQ 11% ;8R TO MAKE THEM NOT EQUAL 
6%: MOV @TSTDAT , SOURCE ; ADDRESS FOR CHKGEN 
= CHKGEN :;GO GENERATE CHECK BITS 
XOR R1,TSTOAT 
MOV . 
xOR R1, TSTDAT+2 
MOV 
xOR Ri, TSTDOAT 
MOV e2,R1 
LOR R1,TSTOAT+2 
7%: MOV @TESTADO, Ri ; TEST LOCATION 
ECCioOIsS sOISABLE ECC ON 1 SELECTED CSR 
MOV TSTDAT .@CR1 )- SWRITE FIRST 16 BITS 
94646 sLOAD CSR WITH IMAGE FROM R2 
9467 032700 104475 CBiCSR sWRITE GENERATED CHECKBITS IN 1 SELECTED CSR 
9466 032702 013771 002244 000000 MOV TSTDAT+2,8(R1) ;WRITE SECOND 16 BITS + CHECKBITS 
9469 032710 104505 CLRICSR ;CLEAR 1 SELECTED CSR 
9470 032712 013702 002364 MOV TESTADO ,R2 ;GET ADORESS OF TEST LOC 
9471 032716 010203 MOV R2,R3 sR2 DESIGNATES FIRST BYTE 
9472 032720 062703 000003 ADD #3,R5 sR3 DESIGNATES LAST BYTE 
9473 032724 112722 000360 8%: MOVE 0360 .,.(R2)> sTRY WRITING A BYTE 
9474 032730 012701 002364 MOV @TESTADD, Ri 
9475 032734 017100 MOV @CR1),RO 
9476 032740 023700 002242 CMP TSTDAT RO ;CHECK FOR UNCHANGED DATA 
9477 032744 001404 BEG 9% ;8R IF OK 
94786 032746 017137 000000 002032 MOV @C(R1), ADDRESS 
9479 032754 104455 PERR31 
94861 032756 017100 000002 9%: MOV @2CR1),RO 
9462 032762 023700 002244 CMP TSTDAT+2,R0 ;sREAD SECOND WORD 
9483 032766 001404 BEQ 10% ;6R IF UNCHANGED 
9464 032770 017137 000002 002032 MOV @2(R1), ADDRESS 
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1 
012701 


104503 
000207 


002260 
002254 


002246 
002252 


002364 


| 
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WRITE INHIBIT OF BYTE wI'h OBE 


10$: 
118: 


12s: 


13%: 


14%: 


15%: 


168: 


cChMP R2,R5 sTESTED LAST Brte ? 

BNE 88 ;6R IF NO 

TSTB8 PASFLG 

BMI 158 ;BRANCH IF TESTING CHECK BITS 
Ts? DBEMSK +2 ;CHECKING FOR LAST ERROR BIT 
+ 12s ;BR IF DONE HERE 


BR ot 
IF @SWil SET.IN @SWR THEN GOTO 153% 
ol tee TRUE THEN GOTO 13% 





st MSK +2 sLAST SBE MASK 
I 138 sBR IF DONE WITH THIS PASS 

DLEFT SBE 
$ 

TSTB PASFLG ;TEST PASS FLAG 

BNE 14% ;NON ZERO MEANS WE'RE DONE 

_ ~ hea sNOT DONR 

BIS @6IT7,PASFLG 

CLR TSTDAT 

CLR TSTOAT+2 

MOV 

MOV 

MOV 

MOV 

XOR 

MOV 

XOR 

ASL 

BIT 

BEQ 

ASL 

BIT 

BNE 

MOV 

ASL 

BR iS 

ECCioIS sOISABLE ECC ON 1 SELECTED CSR 
@TESTADD,R1 sTEST LOCATION 
@CR1)+ ,BCR1) 3TO ERASE ANY DBE'S FROM TESTING 

sRESTORE CSR 

iCSR sCLEAR 1 SELECTED CSR 


Jc 
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MTPOIS WRITE INHIBIT OF GYTE WITH OBE 
9532 033250 MTPO16: SUBTST <«<MTPO16 WRITE INHIBIT OF WORD WITH DBE > 
FS SSSSSSSSSSSSSSSSSSSESSSSSSSHESESSESSESESSEESSSSEESSESSESSESSSSESSEESESEEEEEEEEE EEE EEDES 
;*SUBTEST MTPO16 WRITE INHIBIT OF WORD WITH DBE 
§ SSSSSSSSSSSSSESESSSSESSESSESSESSSESSESEHESSESEESSESESEESESESEESEEESEEESESEECEEEEEEEEEES 
9553 ;sDOUBLE BIT ERROR WRITE CANCEL WITH 
9534 ;sWORD WRITE 
9535 ;CHECKS WRITE INHIBIT WITH WORD WRITES TO 
9536 sWORD WITH DOUBLE ERROR. 
9537 035250 005037 002236 T12A: CLR DATBUF sBACKGROUND FOR DOUBLE ERRORS 
9536 033254 005037 002240 CLR :2 WORDS WORTH 
9539 0335260 012737 000001 002246 MOV 1 SINGLE ERROR MASK 
033266 005037 002250 CLR 
9541 033272 012737 900001 002252 1128: MOV ; DOUBLE ERROR MASK 
9542 033300 005037 002254 CLR DBEMSK +2 
95435 033304 013737 002236 002242 15%: MOV DATBUF , TSTDAT ;DATA FOR TEST 
0333512 015737 002240 002244 DATBUF +2, ae aati me WORDS 
9545 0335320 105737 002260 TSTB PASFLG ;:COMP DATA ON SECOND PASS ONLY 
033324 001404 BEG 2s sBR IF FIRST PASS 
9547 033326 0051357 002242 COM TSTDAT sCOMP FIRST WORD 
9546 0333532 005137 002244 COM TSTDAT+2 sNOW SECOND WORD 
9549 035536 025737 002246 002252 2%: CMP SBEMSK , OBEMSK sCHECK FOR — MASKS 
9550 035 1 BNE 3$ :BR IF OIFFERENT 
9551 05 023737 002250 002254 CMP SBEMSK +2 ,OBEMSK+2;UPPER WORD TOO 
9552 0535554 001 BEQ 8$ :6R TO MAKE THEM NOT EQUAL 
9553 033356 012737 002242 002274 3%: MOV @TSTDAT,SOURCE ;NEED ADOR OF DATA FOR CHKGEN 
9534 033364 004737 041724 CALL CHKGEN ;GO GENERATE CHECK BITS 
9555 0335370 013701 002246 MOV SBEMSK ,R1 
9556 033374 074137 002242 XOR R1,TSTDAT 
9557 03 13 002250 MOV SBEMSK +2,R1 
9556 O05 074137 002244 XxOR R1, TSTDAT +2 
9559 033410 013701 002252 MOV OBEMSK ,R1 
033414 074137 002242 XOR R1,TSTDAT 
9561 033420 013701 002254 MOV e2,R1 
033424 074157 XOR R1, TSTDAT +2 
95635 0334350 012701 002364 4%: MOV @TESTADO.R1 sFIRST TEST ADRRESS 
9564 033434 10447 ECC10IS sOISABLE ECC ON 1 SELECTED CSR 
9565 033436 013731 002242 TSTDAT ,@CR1)-> sWRITE FIRST 16 BITS 
033442 1044 CB1CSR sWRITE GENERATED CHECKBITS IN 1 oo CSR 
9567 033444 0135771 002244 000000 MOV TSTDAT +2, 8(R1 ) ; WRITE SECOND 16 BITS + CHECKBIT 
033452 105037 002261 CLRB UPPFLG sSET FOR 2 LOOPS 
9569 033456 162701 000002 SUB e2,R1 sPOINT TO. LOW WORD 
9570 033462 104503 S$: CLRICSR sCLEAR 1 SELECTED CSR 
9571 033464 012771 177400 000000 MOV #177400 ,@(R1) sTRY WRITING LOCATION 
9572 033472 012701 002364 MOV @TESTADO,.R1 
9573 033476 017100 000000 MOV @CR1),RO 
9574 033502 3 002242 CMP TSTDAT ,RO sCHECK FOR ORIGINAL DATA 
9575 033506 1 BEQ 6$ ;SHOULD BE UNCHANGED 
9576 033510 017137 000000 002032 MOV @CR1), ADDRESS 
p= 7 0335516 104455 PERRS1 
9579 033520 062701 000002 6%: ADO @2,R1 
9580 033524 017100 000000 MOV @(R1),RO 
9561 033530 023700 002244 CMP TSTDAT +2, RO ;THIS SHOULD BE UNCHANGED ALSO 
9562 033534 001404 BEG 
9583 033536 017137 000000 002032 MOV SC R1), ADDRESS 
9584 033544 104455 PERR31 





CZ™SOD0 
MTPOL6 


mS11 


WRITE INHIBIT OF 


-L/4 woot at 
WORD wI 


002261 


~— 1115 
* DBE 


252 
002276 


7$: 


9%: 


10%: 


118: 


128: 


138: 


Ke 
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TSTB UPPFLG ;WHICH LOOP ? 

BNE 8% :SECOND, BR QuT 
INCS UPPFLG sFIRST, KEEP GOING 
BR S$ 

TsTs PASFLG 

BMI 12s 

TST OBEMSK +2 ;LAST BIT ? 

BMI 98 sMINUS + BIT 31 
OLEFT : 


BR 

IF @SW1l SET.IN @SWR THEN GOTO 10% 

IF QVFLAG IS TRUE THEN GOTO 10% 
SBEMSK 


TST *2 sLAST BIT IN THIS MASK ? 
I 10% :BR IF LAST BIT 
DLEFT 
T1268 
TSTB8 PASFLG ;FIRST PASS ? 
BNE 118 3BR IF SECOND 
my Agua s INDICATE SECOND PASS COMING 
BIS @BIT7,PASFLG 
CLR TSTDAT 
CLR TSTDAT +2 
MOV 040 , SBEMSK 
MOV #100 , OBEMSK 
MOV 03740, CHECK 
MOV »R2 
XOR R2 , CHECK 
MOV R2 
xOR R2 , CHECK 
ASL OBEMSK 
BIT @6IT135,0B8EMSK 
BEQ 43 
ASL SBEMSK 
BIT #6IT11,S8EMSK 
BNE 13% 
MOV SBEMSK , OBEMSK 
ASL OBEMSK 
BR 12s 
ECC10IS sDISABLE ECC ON 1 SELECTED CSR 
MOV @TESTADO,R1 sRESTORE TEST ADDRESS 
CLR GC R1)> s;CLEAR ANY DBE‘S FROM TEST 
CLR acRi) 


;CLEAR 1 SELECTED MKi1 CSR 


‘ 
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CZMSODO S13 -./™ DIAGNOSTIC Re m1i15 St GA NCE 
MTPOL6 WRI"E INMIBIT Of WORD uI'h OBE 

9634 034032 MTPO17: SUBTST <«<MTPO17 MOLDING 1°S € O'S TEST>>» 
eer iiiiiiiiriiiiirrrrirrtrirrriritititt it 
3; *SUBTEST MTPO17 WOLDING 1°S € O'S TEST 
FS SSSSSSSSSSESSESSSESSSSSSSSSESSESSSSESSESSSSSSSSSSSESSESESESHESESESEEHSESEEHEHEEOEHEESEEEESE 

9635 3¢(1) THIS TEST CHECKS THE MEMORY FOR THE CAPABILITY 

96 36 i* OF HOLDING 1°S AND O'S BY WRITING A BACKGROUND 

9637 i¢ OF 000377 AND READING IT 

9638 3¢(2) MEMORY IS WRITTEN USING A BYTE AT A TIME 

9659 :#(3) STEPS 1 € 2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN 

9640 sNOTE: THIS TEST WRITES BYTES € READS WORDS 

9641 034032 012701 060000 MOV OF IRST Ri 

9642 034036 010104 MOV R1,R4 

9643 034040 012705 160000 MOV @LAST+2,R5 

9644 034044 012700 000377 MOV @377,R0 ;GET THE PATTERN INTO RO 

9645 034050 010005 MOV RO,.RS 

9646 034052 000505 SWAB RS 

9647 034054 110021 1%: MOVB RO,CR1)> ;sWRITE A BYTE 

9646 034056 110321 MOvsS R3,CR1)> sWRITE THE MEMORY WITH THE BYTE STORED IN BAKPAT.1 

9649 034060 020105 CMP R1,R5 sCOMPARE TEST LOC TO TOP + 2 

Sas 034062 1035774 BLO 1s ;BRANCH IF LOWER 

9651 

9652 034064 014102 2s: MOV -(R1),R2 

9653 034066 020002 CMP RO,R2 sTEST THE MEMORY TO SEE IF IT CONTAINS 

9654 ;THE WORD STORED IN BAKPAT 

9655 034070 001401 BEQ 3$ 

oak? 034072 104446 PERR22 

9656 034074 020104 3%: CMP R1i,R4 sKEEP ON TESTING THE MEMORY UNTIL 

9659 034076 101572 BHI es 3R1 EQUALS THE LOWEST ADORESS 

034100 000303 SWAB RS ;CHANGE THE DATA PATTERN 
9661 034102 0003500 SWAB RO 
034104 001763 BEQ is ;IF THE DATA PATTERN DOES NOT HAVE LOW 
9665 ; BYTE =O THEN FALL THRU 
9664 034106 000207 RE TURN 


r-4 
ic 
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MOLDING 1° 


$ £0°S TES! 
9667 034110 MTPO20: SUBTST <<MTPO20 MARCHING 1°S € O'S IN CHECK B1'S TEST>> 
j POOSSSOSSSSOOSESESEESSSEEEOEESEOEEOESEOSEEOOEEEOEEEEEEEEEEEEEEEEEEESEEEESEEEEESS 
; ¢SUBTEST MTPO20 MARCHING 1°S € 0°'S IN CHECK BITS TEST 
f POSSESS SSESEOESESESOEESESEEEOEEESEEOSEEEEEEEESEEEEEEEEEEOEEEESEEEEEEEEEEEEEEES 
9668 ;*THIS TEST IS CONCERNED ONLY WITH THE INTEGRITY 
pag +4 ;@OF THE MOS RAMS THAT STORE THE CHECKBITS. 
9670 
9671 3077 --> 100 DOWN 
9672 034110 160201 MTPA2O: SUB R2,Ri 3V177640 
96735 034112 160204 Sus ~R4 3V177642 
9674 054114 005711 TST CR1) 3V177644 ;1ST WORD OK? 
9675 034116 001002 BNE is 3V177646 ;NO - SKIP 
9676 034120 005714 TST (R4) 3V¥177650 s2ND WORD OK? 
9677 034122 001401 BEQ 23 3¥177652 ;YES - SKIP 
9676 034124 104455 1$: PERR27 :V177654 ;GO00 =000000 , ,000000, .077 
9679 034126 010514 2s: MOV R3,(R4) 3V177656 s2ND WORD <= 100000 
9660 0341350 005011 CLR (R11) 3V177660 ;CLEAR 1ST WORD 
9681 034132 020100 CMP R1,RO 3V177662 ;ARE WE DONE? 
9662 034134 1015365 BHI MTPA2O :V177664 ;BRANCH IF NOT 
96635 034136 000207 RE TURN 3V177666 
9685 3100 --> O77 WP 
9686 034140 005711 MTPB20: TST (R11) 3V177640 ;1ST WORD OK? 
9687 034142 001002 BNE 38% 3V177642 sNO - SKIP 
9666 034144 020314 CMP R3,CR4) 3V177644 : 
9669 034146 001401 BEQ 4$ 3V177646 sYES - SKIP 
9690 034150 104452 3%: PERR26 3V¥177650 :GO0D 000000, . 100000, , 190 
9691 034152 005014 4$: CLR (R4) 3V¥177652 ;CLEAR 2ND WORD 
9692 034154 005011 CLR CR1) 3V177654 ;CLEAR iST WORD 
9693 034156 060201 ADO R2.R1 3V¥177656 
9694 034160 060204 ADO R2,.R4 3V¥177660 
9695 034162 020405 CMP R4 RS 3V177662 ;TOP + 2 YET? 
9696 034164 001365 BNE MTPB2O 3V177664 sNO - LOOP 
p++ 44 034166 000207 RE TURN 3V177666 
9699 3077 --> 100 UP 
9700 034170 005711 MTPC20: TST CR1) 3V¥177640 ;1ST WORD OK? 
9701 034172 001002 BNE t 3V¥177642 ;NO - SKIP 
9702 034174 005714 TST (R4) 3V¥177644 :2ND WORD OK? 
9703 034176 001401 BEQ 6$ 3V177646 ;YES - SKIP 
9704 034200 104453 St: PERR27 3V177650 i . » 000000, ,077 
9705 034202 010314 6%: MOV R3,CR4) 3V¥177652 sWRITE 1ST WORD 
9706 0 005011 CLR (R1) :V177654 ;sWRITE 2ND WORD 
9707 034206 ADD R2,R4 3V177656 
9708 034210 060201 ADD R2,R1 3V177660 
9709 034212 CMP R4 RS 3V177662 ;TOP + 2 YET? 
9710 034214 001365 BNE MTPC20 3V¥177664 ;NO - LOOP 
9711 034216 000207 RE TURN 3V177666 


Ne 


CZMSDDO MS11-./™ DIAGNOSTIC MACRO M1113 14 JAN-82 16:15 PAGE 286 JE QUE NCE 
MTPO20 MARCHING 1°S € O'S IN CHECK BITS TEST 

9714 3100 --> 077 DOWN 

9715 034220 160201 MTPD2O: SUB R2.R1 3¥177640 

9716 034222 160204 SUB R2,R4 3V¥177642 

9717 034224 020314 CMP R35,(R4) 3V177644 ;2NO WORD OK? 

9718 034226 001002 BNE 7 3V177646 ;NO - SKIP 

9719 034230 005711 TsT (R1) :V¥177650 :1ST WORD Ox? 

9720 034232 001401 BEQ 8$ 3¥177652 :YES - SKIP 

9721 034234 104452 7$: PERR26 3V177654 : *000000,, . 100000, , 100 

9722 034236 005014 8%: CLR (R4) 3V177656 ;WRITE iST WORD 

9723 034240 005011 CLR (R1) 3V177660 ;WRITE OND WORD 

9724 034242 020100 CMP 21,R0 3V¥177662 

9725 244 101365 BHI MTPD2O0 3V177664 

p49 034246 000207 RE TURN 3V177666 

9728 3077 UP 

9729 034250 005711 MTPE2O: TST (R1) 3V177640 31ST WORD OK? 

9730 034252 001002 BNE 9% 3V177642 ;NO - SKIP 

9731 034254 005714 TST (R4) 3V177644 ;2ND WORD 

9732 034256 001401 BEQ 10% 3V177646 :;YES - SKIP 

9733 034260 104453 9%: PERR27 ;V¥177650 :GO0D =000000 , ,000000, ,077 

9734 034262 060201 10%: ADD R2,R1 :V¥177652 

9735 034264 060204 R2,R4 3V177654 

9736 034266 020405 CMP R4 RS 3V177656 ;TOP «+ 2 YET? 

9737 034270 001367 BNE MTPE20 ;V177660 ;NO - LOOP 


9738 034272 000207 RE TURN ;V177662 
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9741 


034274 


014100 


020200 
001401 
104443 
000311 
011100 
020300 
001401 


7 Ma 
-* « 
. 


, 
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MTPA21: SUBTST <«<«MTPA21 MARCHING 1°S € O'S PATTERN TE.'.- 


3 @SUBTEST MTPA2] 1°S € O'S PATTERN TEST 


sREAD .BY TESWAP -MODIF Y .READ , DOWN 


18: “OV -€R1),RO;,V177640 
R2 RO 3V¥177642 
2st 3V177644 
PERRI? 3V17 7646 
2s: Wi AB (R1) 3V177650 
“Ov CR1).RO 3V177652 
R35.RO :v¥177654 
BEQ Ss 3¥177656 
3V¥177660 
3%: CMP R4 Ri 3V177662 ; DONE ? 
BNE is :V177664 sNO LOOP 
RE TURN :V¥177666 s;YES - RETURN 


MTPB21: ;READ.BYTESWAP -MODIF Y ,READ,UP 


1%: MOV (R1),RO ,V177640 
CHP a 3V177642 
BEG $ 3V177644 
PERR2O 3V¥177646 
2s: sd AE (R1) :¥177650 
MOV CR1),.RO ;V177652 
crop R2, 3¥177654 
BEG 38 3V¥177656 
PERRI” 3¥177660 
38: ADO @2,R1 :V¥177662 
Cop Rk 3V¥177666 ; DONE ? 
BNE is 3V177670 ;NO - LOOP 
RE TURN 3V¥177672 :;YES - RETURN 
MTPC21: sREAD.BYTESWAP -MODIFY ,.READ,. UP 
L$: MOV C(R1),RO ,V¥177640 
CMP RO 3V¥177642 
BEG 3V177644 
PERRI? 3V177646 
26: SWAB (Ri) 3¥177650 
MOV CR1).RO 3V¥177652 
Cor RS,RO 3V177654 
BEG 3s 3V¥177656 
PERR2O 3V¥177660 
38; ADO @2,R1 :V¥177662 
CMP Rl 1V¥177666 3 DONE ? 
BNE $ sV177670 NO 


P - LOOP 
;VYES - RETURN 


a 
3 


3V177672 


44 


Ty ke MARCHING or é BE sarremme 


014100 
020300 
001401 
104444 


000311 
011100 
020200 


001401 
104445 
020401 
001365 
000207 


— 
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Test 


: 


es: 


3$: 


MTPD21: 
$: 


sREAD BY TE SWAP -MODIF 1 READ, 00m 


-(R1),R0;V177640 
RS5.RO 3¥177642 
2s 3V¥177644 

3V¥177646 
(RL) 3vV177650 
(R1),.RO 3V177652 
R2,RO 3v¥177654 
38 3V177656 

3V177660 
R4.R1 3V¥177662 
i$ 3V¥177664 

3V177666 


3 DONE ? 


3NO - LOOP 
;YES - RETURN 
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9611 034444 MTPO2Z2: SUBTST <«™TPO22 REFRESH € SHIFTING DIAGONAL TEST>> 
FP SSSSSSSSSSSSSSSSSSSSSSSSSSHSSSSHSSSSSESSSESSESSESESESSSSSESESSESEEEOEEE SE EEEEEEES 
;*SUBTEST MTPO22 REFRESH € SHIFTING DIAGONAL TEST 
FT SPSSSSSSSDSSSSSSSSSSSSSSESSSSSSSESSSSESSSSSSSOSSSESSSSESSSSESESESSEESEEEOESEEEEESEEEEEEESE 
9612 3(€1) WE WRITE A DIAGONAL PATTERN IN MEMORY (WITH CACHE ON). 
9615 3(2) IF A REFRESH TEST WE DISTURB ALL ROWS FOR >» 2 ~ 9 (wi ty CACHE ON). 
9614 3(3) WE READ €& 4 F FOR CORRECTNESS THE DIAGONAL PATTERN 
9615 3 (WITH CACHE OF 
9616 000010 KDIAG=-8. ie 6 OF Ten A OIAGONAL STRIPE OCCURS (MUST BE A POWER OF 2) 
9617 034444 FOR EVEN :* @1 10 @2 sFOR DATA E COMPLEMENT DATA 
9616 034452 IF EVEN EQ @1 
98619 034462 LET R2 := ZE 
034466 LET RS := ONES 
9621 034472 EL 
9622 034474 T R2 := ONES 
9623 034500 LET RS := ZERO 
034504 END ;OF IF EVEN 
962% 034504 FOR STRIPES :* #0 TO @KDIAG-1 ;FOR THE NUMBER OF STRIPES 
9827 ;WRITE LOOP 
9626 034510 104423 CACHON ;TURN CACHE ON 
i2 LET COUNT := STRIPES 


LET Ri := @FIRST 
WHILE R1 LOS @LAST 
IF COUNT LT #0 THEN LET COUNT := @KDIAG-1 
IF @374 OFF .IN R1 THEN LET COUNT :* COUNT - @]1 
IF COUNT NE @0 
LET (RL) : eRe 
st 2(Ri) :* R2 


LET (Ri) :* R53 

LET 2CR1) := RS 
END ;0OF IF COUNT 
LET COUNT := COUNT - 01 
LET RL :* RL + O4 





END ;OF WHILE 
sEND OF WRITE LOOP 

034616 pe ory IS FALSE THEN $SCALi REFRESH 
s L 

034630 LET COUNT :+ STRIPES 

034636 LET R1 :* OF IRST 


O34642 104424 CACHOF F ;TURN CACHE OFF 


= 
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9852 054644 WHILE R1 LOS @LAST 


33 


034652 IF COUNT LT @0O THEN LET COUNT :+ @KDIAG 1 
034666 IF @374 OFF IN Ril THEN LET COUNT :* COUNT @\ 
034700 IF COUNT NE €0 
034706 LET RO := (R11) 
034710 IF R2 NE RO 
034714 104445 PERRI 7 
034716 END ;OF IF 
034716 LET RO := 2(R1) 
034722 
034726 106445 1 
034730 END ;OF IF R2 
034730 ELSE 
034732 
034734 
034740 104444 
034742 END ,OF IF RS 
034742 : 
034746 ME. 
O3475S2 104444 
034754 
034754 END T 
054754 LET T :*= COUNT - @1 
034760 LET Ri 
034764 END , OF 
sEND OF READ LOOP 
034766 END ;OF FOR STRIPES 
035002 END ;OF FOR EVEN 
035016 000207 RE TURN 
035020 REFRESH: SUBTST <<SUBR REFRESH DELAY>> 
§ FSSSSOSHSSSSSSSSSSHSSHSHSEHSSSESSESESSESSSEESSESESESEESESSESEEESSESEEEEEESEEEEEEEEEHEEOEEEEE 
3 ¢SUBTEST REFRESH DELAY 


£ SSSSSSSSHSSSSSSHSSSSSESSSSSSSHSESESSSEESSSSEOESEHESESEEESESESEEEESHESOESEEEOEEEHOOOEREE 


sOISTURB EACH ROW FOR > 3.2 MS 
035020 FOR RO :* @FIRST 17 OFIRST+374 BY 24 
035024 CALL REFSUB 


OF FOR RO 


° 
¥ 
s 


PEERS PE EEE SS 3 34. 
° 


LET 2° OF IRST-BIT14 
035046 WHILE RO LOS @LAST+BIT14-374 
035054 004737 035070 CAL REFSUB 
035060 LET RO := RO - 04 
035064 END ;OF WHILE 
035066 000207 RE TURN 
035070 012704 000640 REF SUB: MOV 0640 ,R4 s;TIME FOR A > 3.2 MS LOOP 
035074 062700 000002 ADO @2,R0 
035100 005140 i$: COM -(RO 
035102 005120 COM (RO)-> 
035104 005110 COM (RO) 
035106 005110 COM CRO) 
035110 077405 $08 R418 
035112 162700 000002 SUS @2,R0 
035116 000207 RE TURN 


nae 


ZMSD0O M51 
RES 


9906 035120 


9907 
9906 
9909 
9910 
9911 
9P1i2 
9915 
9914 
9915 
9916 
9917 
9916 
9919 
9920 
9921 
9922 
9925 
9925 
9927 
9926 
9929 
9930 
993 


1 
9932 035120 
33 


9945 
9946 035150 
9947 035154 


1. /™ OITAGNOSTIC 
RESH DELAY 


011100 
020004 
001401 
104447 
011200 
020003 
001401 
104450 
062702 
020205 
101764 


062701 000002 
000137 035160 


maCR@O 1115 
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tz 


<<MTPA24 FAST GALLOPING PATTERN TEST>> 


§ PF SSSSSSSSSSSSSSSSSSSESSSSESSESSSSSSSESSSOSSHSSESESSESESEESESEEEESEEESEEEEEEOEHERESES 
3; ¢SUBTEST 


sTHE TOTAL TEST C INCLUDING 


MTPA24 FAST GALLOPING PATTERN TEST 


SETUP) IS AS FOLLOWS 


VANCE 


:e(1) THIS TEST WRITES THE Ay al wITH A BACK GROUND PATTERN 

:¢ STORED AT LOCATION BAKPAT 

3*C2) TEST BEGINS AT LOWEST LOCATION BEING TESTED 

:¢ (LETS NAME IT ‘A’ ) 

:°(3) LETS NAME THE 1ST tte _ THE ROW/COLUMN UNDER TES’ AS 8°. 
:*(4) SWAPS ev Tes FOR LOCAT ION 

3°(S> READS A‘, READS 

3#(6) ‘SB’ = . 400 (ADDS 64 DOUBLE WORDS TO ‘B' ) 

3¢(7) REPEATS STEPS 5S AND 6 UNTIL ‘B' IS GREATER THAN THE 

:*(6) END OF THE BANK A+2 

yoo B REPEATS STEPS 3-8 UNTILL ‘A’ REACHES THE END OF THE BANK 
oe 


AFTER EXECUTING THE TEST DATA IS COMPLEMENTED 
AND STEPS 1-9 ARE REPEATED 
; REGISTERS ARE USED AS FOLLOWS 





3;RO TEST DATA 
3R1 ‘A’ 
sR2 ‘SB’ 
;R3 BAKPAT 
RS SWAPAT 
RS LAST 
sNOTE THE PATTERN STARTS AT MYTPB24!ttttstesteeers 
sUIPAR'S 
18: MOV (R1i),RO 3V¥177640 
chp RO ,R4 3¥177642 
BEQ 26 3V¥177644 
PERRZS 3V¥177646 
2s: MOV 3V¥177650 
CMP :¥177652 
BEQ 3V¥177654 
PERR24 3V¥177656 
38: ADO 3V¥177660 ; e 
CMP 3V177664 ;AT END YET? 
BL0S 3V177666 :BR IF NO 
ADO @2,R1 3V¥177670 ;BUPP ‘A’ 
ae Ben TPB24 3V¥177674 :GOTO v177260 


CZ™SOD0 
MTIPALS 


Sii u./™ OF 


9956 035170 


035174 


035174 
035176 


AGNOSTIC 
GALLOPING PATTERN * 


000157 035174 


COGS 
000137 035140 


MACRO 1115 


— 
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MTPB24: SUBTST <<MIPB24 FAST GALLOP PART B8>> 


;*SUBTEST MTPB24 FAST GALLOP PART 8 
FF SSSSSSSSSSSSSSSESSSSSSESESSSSSSSSESESSESSESSESESSESSESESSESEEEESESEEESESESESSEEEEEEEOEOEOEEESE 
:;SOPAR’S 
“OV R4,(R1) ;V172260 ;WRITE ‘A 
CMP R1,R5 3V¥172262 ; DONE ? 
BNE is 3V¥172264 ;BR IF NO 
RE TURN 3V172266 YES - RETURN 
1%: JP BOMTPC24 :V¥172270 :;GOTO v172360 


MTPC24: SUBTST <<MTPC24 FAST GALLOP PART C>>» 


F SFSSSSSSESSSSSSSESSESESSSSESSSESSSSESSESASSHESSESSEESEEEESEEESSEEEEESEEEEEEEEEEEOEEEEEEEES 


; SUBTEST MTPC24 FAST GALLOP PART C 
§ SSSSSSSSSSSSSSSSSHESESSESSESSSSESSEESSSESESSSSSESESSESESESSEEESESSESEEEHESEEEHREEEEEESESE 
sKDPAR’S 
MOV R1,R2 3V¥172360 sRESET ‘6° <--- ‘A’ 
MOV CR1),RO :¥172362 sREAD ‘A’ 
CMP RO,R4 3V172364 ;CHECK ‘A’ 
Q i$ 3V172366 ;BR IF OK 
PERR23 :¥172370 ;REPORT ERROR 
1s: JP BOMNTPA2Z4 +20 :V172372 sGOTO v177660 


CZ™SDDO watt ./™ DIAGNOSTIC MACRO “1115 14 JAN-82 16:15 PAGE 300 EQ ANC 
MTPCO4 FAST GALLOP Par? C 
9966 035212 MTPO25: SUBTST <«MTPO?25S INTERRUPT ENABLE TEST-> 
§ FSSOSSOSSESSSSSSSSSSSSSSSSESSESSSSESSSSSESESSSESEEESSEEEEEEEEESEEEEHESEEEEEEEEEESES 
; eSUBTEST MTPO25 INTERRUPT ENABLE TEST 
F FSSSSSSSSSSSSSSSSSSSSSESSSSSESESSSEESESSEESSEESESESESEESEEESESEEEEEEESEEEEESEESEEEEE ORES 
9969 035212 005037 002242 CLR TSTDAT ;GENERATE CHECKBITS ON 0,.0 
9970 035216 005037 002244 CLR TSTDAT+2 
9971 035222 012737 002242 002274 MOV @TSTOAT , SOURCE 
9972 035230 004737 04641724 CALL CHKGEN 
9973 035234 012737 000003 002074 MOV ©3,NOPAR ;SETUP PARITY ACTION 
9974 035242 012701 002364 MOV @TESTADO.R1 ;FIRST TEST ADORESS 
9975 035246 012737 035306 002266 MOV 018 ,PARTHERE ;SETUP TRAP DESTINATION 
9976 035254 004737 035530 CALL MTPA2S ;WRITE DATA € CHECKBITS 
9977 035260 104473 ECCLINIT s INITIALIZE 1 SELECTED x11 CSR 
9978 035262 005771 000000 TST acRi) sACCESS LOCATIONS FOR DBE TRAPS 
9979 035266 005771 000002 TST @2(Ri) 
9980 ;NONE - GOOD - ACCESS FOR SBE TRAPS 
9961 035272 104507 ENA1SBE ;DISABLE TRAPS ON SBE’S FROM 1 SELECTED CSR 
9962 035274 005771 000000 TST acRi) 
9983 035300 005771 000002 TST @2(Ri) 
9984 035304 000404 BR 2s s;NONE - GOOD - SKIP 
99865 035306 104426 18: READCSR 
9986 035310 FATAL 27 
9987 035316 005237 002242 2%: INC TSTDAT :;CHECK FOR CORRECT ACTION ON SBE'S 
9988 035322 004737 035456 CALL MTPD25 ;IN ALL 4 BYTES 
9989 035326 012737 000400 002242 MOV #400, TSTDAT 
9990 035334 004737 035456 CALL MTPD25 
9991 035340 005037 002242 CLR TSTDAT 
9992 035344 005237 002244 INC TSTDAT +2 
9993 035350 004737 035456 CALL MTPD25 
012737 000400 002244 MOV @400, TSTDAT+-2 
9995 035362 004737 035456 CALL MTPOD25 
9997 035366 005037 002244 CLR TSTDAT +2 :;CHECK FOR CORRECT ACTION ON DBE'S 
9996 035372 012737 000003 002242 MOV @3, TSTDAT IN ALL 4 BYTES 
9999 035400 004737 035500 CALL 
10000 035404 012737 001400 002242 MOV #1400, TSTDAT 
10001 035412 004737 035500 CALL MTPE2S 
10002 035416 005037 002242 TSTDAT 
10003 035422 012737 000003 002244 MOV @3, TSTDAT+2 
10004 035430 004737 035500 CALL MTPE2S 
10005 035434 012737 001400 002244 MOV ©1400, TSTDAT+2 
10006 035442 004737 035500 CALL MTPE2S 
10007 035446 104503 CLRICSR ;CLEAR 1 SELECTED Mk11 CSR 
10008 035450 005037 002074 CLR NOP AR s INDICATE PARITY ACTION 
16009 035454 000207 RE TURN 
10011 035456 004737 035530 MTPD25: CALL MTPA25 ;WRITE DATA & CHECKBITS 
10012 035462 104471 ECC10IS sOISABLE ECC ON 1 SELECTED CSR 
10013 035464 004737 035552 CALL MTPB2S s;CHECK FOR NO TRAPS 
10014 035470 104507 ENALSBE ;DISABLE TRAPS ON SBE‘S FROM 1 SELECTED CSR 
10015 035472 004737 035612 CALL MTPC2S :CHECK FOR EXPECTED TRAP 


10016 035476 000207 RE TURN 


ZMSOOO MS11-./M DIAGNOSTIC 


INTERRUP | 


035500 
055504 
035506 


035512 
035514 
035520 


035564 
035570 


035572 
ane 74 


35600 
035602 


0046 035610 


035612 
0 


005771 
000405 


ENABLE 


TEST 
035530 
035552 


035612 
035612 


002242 
002244 


035572 
000000 
000002 


002032 


035626 
000000 


035656 
000002 


002032 


° 
| « 

; 
_ 
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MTPE2S: CALL MTPA2S sWRITE DATA € CHEC..BITS 
ECCiDIS ;DISABLE ECC ON 1 SELECTED CSR 
CALL mT ;CHECK FOR NO TRAPS 
sENABLE DBE TRAPS 
ECCLINIT sINITIALIZE 1 a oes oe M11 CSR 
CALL MTPC25 ;CHECK FOR EXPECTED TRAP 
ENAL DISABLE TRAPS ON SBE'S FROM 1 SELECTED CSR 
a MTPC2]5 ;CHECK FOR EXPECTED TRAP 
sWRITE TSTDAT € TSTDAT+2 € CHECKBITS 
MTPASS: ECC10IS ISABLE ECC ON 1 SELECTED CSR 
000000 MOV TSTDAT ac Ri) IWRITE FIRST 16 BITS 
cB1IC sWRITE GENERATED CHECKBITS IN 1 SELECTED CSR 
000002 MOV TSTDAT+2,@82(R1) WRITE 2ND 16 BITS € CHECKBITS 
RE TURN 
;CHECK FOR NO TRAP OCCURING CONDITION 
002266 MITPB25: MOV @1% , PARTHERE ;SETUP TRAP DESTINATION 
Ts? acRi) sACCESS LOCATIONS 
TST @2cRi) 
RET ;NO TRAP - GOOD - RETURN 
1$: RE 
MOV  ~ _oeaaaeameed :;SAVE VIRTUAL ADDRESS 
SET HEADER 
RET 
; TRAP SHOULD OCCURE TEST 
002266 MTPC25: MOV @1% ,PARTHERE ;SETUP TRAP DESTINATION 
TST acRi) > tae 1ST LOCATION 
8R 2s TRAP WS - SKIP 
002266 18: MOV @3% ,PARTHERE | SETUP TRAP DESTINATION 
TST B2¢(R1) sACCESS 2ND LOCATION 
2s: READCSR 3NO TRAP - BAD NEWS 
MOV C(R1), ADDRESS ; SAVE VIRTUAL ADDRESS 
ERROR ° 
SET HEADER 
S$: RE TURN 


ft 4 * NCE 


CZMS000 
MTPO25 


10062 


10101 
10102 
10103 
10104 
10105 


MS11 L/™ DIAGNOSTIC 


INTERRUPT ENABLE 


035660 


035756 
035760 
035762 


000137 
010221 
0103521 
077005 
000207 


TEST 


035750 


035730 


177764 


001057 


047401 


035664 
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SEQUENCE 


MTPA26: SUBTST <<MIPA26 RANDOM DATA (WRITE )>> 


§ PF SSOSSSSSSSSSSESSSSESESSSESSSSESESESESSEESSESSEEESESEEEEESESSEEEEESEEEEEEHEESEEHEEESEEEEEE 


3; @SUBTEST MTPA26 RANDOM DATA (WRITE) 
j POOSSESESESSESEEESEESESESESOSESESESEEESEEEOEEEESEESEEEEEEEESEEESEEEEEOEEEEE SEEDS 
is: JP BEMTPC26 3V177640 GOTO v172360 
MOV R2,(R1)- 3V177644 
MOV R3,CR1)« 3V177646 
SOB 18 3V177650 
RE TURN 3V1776S2 
MTPB26: SUBTST <«<MTPB26 RANDOM DATA (READ )>> 


; *SUBTEST MTPB26 RANDOM DATA (READ) 


§ FSSSSSSSSSSSSSSESSSSSESSEESSSESESSESSESSESSESESEESESSESESESESEESSEHESEESESEESESESEEEEESEEHOEREEEEE 


i$: 3V177640 GOTO v172360 


2s: 


RANOOO : FOR ERROR REPORTING 


3%: 3V177664 
3V¥177670 


3V177672 





5 3% 


MTPC26: SUBTST NUMBER SUBPROGRAM> > 


F FSSSSSSSESSESSHSSESSSSSOSSESSESSESEESESSSESESESESSEESESEEESEESEHEESSHESEEEEEEHEKEEEEEEOE 
R AM 


3s *SUBTEST 


§ FSSSSSSSSSSSSSSSSSHSSESSSSESSESASHEEESEEEASEOSEESEEEEEEEEESEEEEESEEEEESEEEEEEEEOEES 


;CALLER MUST SETUP 





MOV e 
: MOV SEEDHI ,R2 
3 MOV 3,R5 
; MOV R2,R4 
ASHC @7,.R4 3¥172360 
ADD R3,R5 3V172364 
ADC R4 3V¥172366 
ADO R2,R4 3V¥172370 
ADO #1057,R5 3V172372 
NOP :V¥172376 GOTO vi72260 


MTPD26: SUBTST <<RANDOM NUMBER SUBSUBPROGRAM> > 


§ SSSSESSSSSSEESSESSSSSESSESESESSESSESESSESESSESSESESEEESSESESESESEEESESESEHEASEESESEEEESEEEEEE 


; *SUBTEST 
§ FSSSHESSSSSSSESSESESSSSEESESESSSSESSESSESSSESSESSSESESESEESESESEAESSHESEHEESESEEESEEEEEEEEEESE 
ADC Ra 3¥172260 
ADO €47401 ,R4 3V172262 
MOV R5.RS 1V¥172266 
MOV :V¥172270 
JMP BOMTPAZE +4 sVi72272 GOTO V177644 


CZMSDDO S11 ./™ DIAGNOSTIC 
RANDOM NUMBER SUBSSUBPROGRAM 


10108 


10109 


035766 


035766 
035770 
035772 
035774 


035776 


035776 


177772 
177766 


177756 
177752 


002474 


, 7 
i¢ « 
NS 
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MTPOSO: SUBTST <<MTO0O030 


FLUSH OUT DBE’ S>> 


F SSSSSSSSSSSSSSSSSSSSESSESSSSSSESESEHESESEEEEEEESESESEESEEESEEEEEEEEEEHEEHEEE EEE EREEEEES 


F SSSSSSSSSSESSSESSSSSSESSESESSESSSSESESESSESESESEEEEEESEECEESEEEEEEEEEEEEEEEEESEEEEEEEHEEEES 


3V¥177640 
3V177642 
3V177644 
3V177646 


;eSUBTEST MTOOSO FLUSH OUT DBE’'S 
18: MOV (RO),R2 

MOV R2,(RO)- 

$08 R118 

RE TURN 
MTPO31: SUBTST <<MTPO31 


SOB -A-LONG TEST>>» 


F FSSSSSSSSSSSSSESESSSSSESSSEESESESESESESESESEESEEEESEESEEESESEEEESEEEEEERESEEEEEEE SERA EEEES 


§ SSSSSSSSSSSSESSSESSESSESEESESSESESESEHESESEEESESESEEEESEEEEEEEEEESEEEEEEEEEESERHEEESEEEEEEEE 


sMOVE TERMINATOR 

;SOB TILL RO UNDERFLOWS 
;WRITE COMPLEMENT OF SOB 

a —— FOR NOT “SOB RO,DOT” 
; — 


sCORRECT SOB INSTRUCTION 
;REINITIALIZE SOB CONSTANT 


;BUMP (SAFELY) BY 2 


; *SUBTEST MTPO31 SOB-A-LONG TEST 
AMA 
1%: sos RO,18 
COM i$ 
CMP R1,1$% 
BEG 2s 
PERR3SO 
MOV R1,18% 
2s: COM i$ 
MOV R2,RO0 
3; UPDATE MOVE REGISTERS 
MOV RS,R3 
TST CRS)- 
MOV RS.R 
CMP RS, BOL INK1 
BNE 3$ 
RE TURN 
3$: MOV 


-(R3), -C(R4) 
3% 


i$ 
SOBLENGTH=, -MTPO31 
_ENABL AMA 


’ . 


CZMSODO MS11-L/M DIAGNOSTIC MACRO M1115 14 JAN-82 16:15 PAGE 308 SEQUENCE O44 
MTPOS, SOB A-LONG TEST 
10165 036054 MTPOS2: SUBTST <«MIPO32 WRITE RECOVERY TEST>> 
§ FSSSSSSSSSSSSSSSSSSSSSSSSSSSSESSESSSSESSESSSSSSESSESESESSSESESEHSSOSEEEHESOESESEEEEEEESS 
; SUBTEST MTPOS2 WRITE RECOVERY TEST 
FS OSSSSSSSSSSSSSSSSSSSESSSSSSSSSSSSESSSSESSESSSSESEEESESESSEEEEESEESEESEESEESEEEESEEESEEEEE 
10166 ;THE TEST ACTUALLY EXECUTED ALREADY IN THE MEMORY UNDER TEST. 
10167 sTHIS CODE INSURES THAT IT CHANGED MEMORY TO HAVE 
10168 31/2 BANK OF #5141 WHICH IS A “COM -(R1)” INSTRUCTION ANO 
10169 31/2 BANK OF 110 WHICH IS A “JMP (RO)” INSTRUCTION. 
10170 
10171 036054 012401 1s: MOV (R4)+,R1 :V177640 :GET DATA FROM LOWER 1/2 BANK 
10172 036056 020102 CMP R1i,R2 :V177642 ;IS IT #5141? 
10173 036060 001401 BEQ 2% 3V177644 ;YES - SKIP 
10174 036062 104430 PERRO2 ;V177646 ;NO - TAKE ERROR TRAP 
10175 036064 077305 2s: SOB R3,1$ ;V177650 ;LOOP FOR 1/2 BANK 
10176 036066 013703 002474 MOV BEL INK1,RS :V177652 ;RESTORE LOOP 
10177 036072 012400 38: MOV (R4)+,RO :V177656 ;GET DATA FROM UPPER 1/2 BANK 
10178 036074 CMP RO.RS :V177660 ;IS IT 01107 
10179 036076 001401 BEQ 4$ ;V177662 :YES - SKIP 
10180 036100 104427 PERRO! ;V177664 ;NO- TAKE ERROR TRAP 
10181 036102 077305 4s: SOB R3,3$ :V177666 ;LOOP FOR 1/2 BANK 


ZMSOO0O S11 ./™ DIAGNOSTIC 


maz 
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WRITE RECOVERY TEST 


036106 MTPOS3: SUBTST <«<MTPOSS BRANCH GOBBLE TEST>> 
§ FSSSSSSSSSSSSSESSSSSSESSSSHEHSSESSESESESESSSEESESEESESEEESSEEEEESEEEEEESEEEEEEEEEEOEEES 
; *SUBTEST MTPOSS BRANCH GOBBLE TEST 
§ SSSSSSSSSSSSSESSSSSSSSESSSESSESSESFEHSESSSESSSESSSSESSEESESSEESEESEESESEEEHRESEEEEEEESEEEEES 
.OSABL AMA 
036106 000000 0 :MOVE TERMINATOR 
636110 000000 BGTEST: O :; TEST WORD (TWO BYTES) 
036112 000261 BRGOBB: SEC ;SET CARRY (TO BE ADDED 10 “BGTEST”) 
036114 105511 AOCB (R11) ; INCREMENT LOW BYTE OF “BGT 
036116 1 BMI is ;BRANCH WHEN BIT? IS SET 
3% 1052 INCB (R2) s INCREMENT HIGH BYTE OF “BGTEST~ 
036122 000773 BR / LOOP 126 TIMES 
s;NOW CHECK FOR CORRECT CONDITION CODES 
036124 102401 L$: BVS es ;8R IF vV-BIT SET (SHOULD BE) 
036126 104461 PERRSS :NO REPORT RROR AND ABORT TEST 
; COND CODES NOT EQUAL TO 1010 
036130 000242 2%: CLY ;CLEAR v-BIT 
036132 105212 INCB (R2) s INCREMENT HIGH BYTE OF “BGTEST” ONCE MORE 
036134 103402 ecs 3% ;B8R IF C-BIT SET (SHOULD NOT BE) 
036136 102001 BvC 3% ;8R IF V-BIT CLEAR (SHOULD NOT BE) 
036140 100401 BMI 4% ;8R IF N-BIT SET (SHOULD BE) 
036142 104461 3%: PERRSS :NO - REPORT ERROR AND ABORT TEST 
:;COND CODES NOT EQUAL TO 1010 
sUPDATE TEST POINTERS 
036144 010701 4%: MOV P 
036146 162701 000036 St: SsuB @5% -BGTEST.R1 
036152 010102 MOV R1,R2 
036154 005202 INC 
;UPDATE MOVE REGISTERS 
036156 010503 MOV RS .RS 
036160 005725 TST (RS) ;BUMP (SAFELY) BY 2 
036162 010504 MOV RS .R4 
3 DONE ? 
036164 020537 002474 CMP RS, @eL INK1 ; DONE ? 
036170 001001 BNE 64 ;NO - SKIP 
036172 000207 RE TURN ;YES - RETURN 
sMOVE CODE 1 LOCATION 
036174 014344 6%: MOV -(R3), -CR4) 
036176 001376 BNE 6% 
036200 005011 CLR (R11) ;CLEAR TEST WORD “BGTEST” 
036202 yo 2 de BR ;RUN MOVED CODE AGAIN 


GBLENGTH-. -MTPOSS 
. ENABL 


AMA 


CZMSODO MS11-./™ DIAGNOSTIC MACRO M1113 14-JAN-62 16:15 PAGE 311 SEQUENCE 
MTPO35 BRANCH GOBBLE TEST 


10231 036204 MTPO34: SUBTST <<MTPO34 SOFT ERROR - BACKROUND PATTERN TEST>> 
{ PPOSOSSOESSSESSEEESESEEEEEEESEEEEEOEEESEEE SEES EEEEEEEEEEEEEEEEEEESESEEEEEEEEEES 
3; ¢SUBTEST MTPO34 SOFT ERROR - BACKROUND PATTERN TEST 
5 OOOO SSSESESSESEEEEEEESESEESSEEEEESEEEEEEESEEEEEEEEEEEEEEEEEEEEEEEDEEEEEEEEEEEES 
10232 036204 010220 is: MOV R2.(RO)-+ ;V177640 
10233 036206 077102 SoB R1,.MTPO34 :V177642 
10234 036210 000207 RETURN 3V177644 
10235 036212 012401 2s: MOV C(R4)-,R1 3V177646 
102356 036214 020102 CMP R1,R2 3V177650 
10237 036216 001402 BEG 3$ :vi776S2 
10238 036220 104430 PERROO 3V177654 
10239 036222 000240 NOP 3V177656 
10240 036224 077306 33: S08 R3,2$% ;V177660 


CZ™SOD0 
MTIPOS4 
10243 036230 


MS11 ./M OITAGNOSTIC 
ST ERROR BACK 





002052 
054 754 


036340 


002074 
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ROUND PATTERN TEST 


0026 50 


002144 


ba 
SEG ance 


MTPOSS:SUBTST <<MTPO3S WORST CASE NOISE PARIT?: TEST-- 
er iriiiiiiiiiiiiiritiiiriiitriririiriririiiririte 
3s @SUBTEST MTPOSS WORST CASE NOISE PARITY TEST 
Tr rrrrriiiiriliiiiiiiiiirtriiirririrriiriiririiiiritT 


MOV @3,NOPAR :SET PARITY TRAPS TO RETURN TO “PARTHERE ~ 


FOR RO :* @FIRST 10 @LAST Br #4000 
MOV @BIT2!BITO.CSR ;SET WRITE WRONG PARITY £ PAR. TRAPS INTO CSR 
LOADCSR 
MOV @1%,PARTHERE 


MOv (RO), CRO) swwP TEST LOCATION 


PERBNX 
BIT @BIT10, CONF IG-2(R3) 
BNE 2s 
1%: READCSR 
ERRGEN 
2s: Ci.RIC 


SR 
MOv (RO), (RO) 
“Ov @BITO.CSR 


sCLEAR WRONG PARITY IN MEMORY 


LOADCSR 
MOV @5% ,PARTHERE 
TST CRO) 
BR 4% 

3s: MOV RO,ADDRESS 
ERROR -5O 
CAL 


sRESET PARITY TRAP ACTION 


SPSEPOaRBHY shed OPA 


10275 
10276 
1027" 


10276 


036572 


036372 
036574 
036376 
036400 


036402 


010004 
010105 


002560 
177774 
00000 


MACRO M111"5 14 JAN-62 16:15 PAGE 315 ENCE 


002560 
002560 


-SBTTL MISC SUBROUTINES 
REGCOP’:SUBTST <<SUBR COPY RO TO 84,R1 TO RS, & R2 TO RS>> 


3 *SUBTEST SUBR COPY RO TO R4,R1 TO RS, E R2 TO RS 
§ POPSSOOOSOSSSESSESESEOOEEOEOESOEESOEOOEEESEOEEESEEEEEEEEEE EEE EERE EEEEDEEEEEESS 
MOV RO,R4 
MOV R1,R3S 
MOV R2 eS 
RE TURN 


FLIPWARN: SUBTST <<FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS*> 


£ SOSSSSSSSSSSSSSSSEESSSSSSSSESESSESSSSESESESESESOEESSSEEESEESESESEEESHEESHSEHEOESOEEEESE 


3; SUBTEST FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS 
§ FSSSSSSESSSSSSSSSSSSSSSSHSSSSSSSESSSSSSSSESSSSESSESESSEESEOSEEEEEEESEEEEEHEEEHEEEEEE 
PUSH RO 
INC FLIPLOC 
BIC orC3,FLIPLOC 
CMP @#1,.FLIPLOC 
BEG § 
CMP @2.FLIPLOC 
BEQ 
CoP @3,FLIPLOC 
BEG 3% 
CLR RO 
MOV ONES ,R4 
BR 43 
1%: CLEAR RO ,R4 
BR 4S 
2s: MOV 0401 ,RO 
MOV ONES ,R4 
BR 4t 
58: MOV @401.,R0 
MOV 0401 ,R4 
4$: MOV RO , WARN? 
MOV RO, WARNS 
MOV RO, WARNS 
MOV RO, WARNS 
POP RO 
RE TURN 


10310 036532 


10311 

10312 0365352 
10513 036534 
10314 036540 


10327 036650 


MACRO M1115 i4 JAN 62 16:15 PAGE 314 
NOISE 


CASE 


a | 


ty ance 
TESTS 


BACKGND: SUBTST <<SUBR WRITE BACKGROUND>> 


;*SUBTEST SUBR WRITE BACKGROUND 


§ SSSSSSSSSSSSSSSSESSSSSSSESSSSESESESSSESSESSESEESEEESESESESESEEEEEEESEEEEEEEEEEEES 
sWRITES DATA FROM RO 
SAVREG 
oF IRST RO 
@SIZE.R1 
@1,PROT YP 


WARNED 
@207 .MTPO000-+-4 
MOV @MTPOOO, 


SUPDOS 
0240 .MTPO000 +4 


sWARNING PUTTING “RETURN” AFTER WRITE 
sRESTORE ‘NOP’ AFTER WRITE 


MTPOOO 


@207 ,UIPAR2 sWARNING PUTTING “RETURN” INSTRUCTION AFTER WRITE 
SUP0O01 


8 
10379 


MS11 ./™ DIAGNOSTIC 
WRITE BACKGROUND 


0366 52 


037134 
000060 


‘ 
a | 
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000060 
000062 


177776 
143700 


0025530 


002530 


143472 


PCOM IG: SUBTST 


PCONM 1: 


Saaz 258282 


PCONM2: MOV 


A a s  .. 


<«<SUBR PRINT CONFIGURATION MAP>> 
§ SOSSOSSSSSS SESOSSOEESESOOS SESE OEEEEESEOEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEES 
;@SUBTEST 


SUBR 
TKVEC, a e2,RO0 


BIT? ,PSw 
@BIT6,. StTKS 


MSGOO1 


MSGOOS 
@60 ,L AS TBANK 
NOOU 


PCON'S , SP 
@BIT6.A6TKS 

@$ TKB ,RO 

RO, TKVEC +2, TKVEC 


PRINT CONFIGURATION MAP 


;SAVE LAST GOOD sP 


sKILL ANY OLD INTERRUPT 
;LOWER CPU PRIORITY TO 140 
:ENABLE KEYBOARD INTERRUPTS 


3GO TYPE CONFIGURATION (1ST HALF ) 


sPRINT SPACE(S) 


sPRINT SPACE(S) 


3 SPACE 


sRESTORE STACK 
sREAD CHAR TO KILL FLAG 


;STACK SAVED HERE! 


CZMSODO MS1i i. /™ DI 
CON IGUR 


SUBR 
103862 


10428 


PRINT 
037134 


037250 


000001 002626 


, 
+6 
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SUBTST <<SUBR TYPE CONF IGURATION>> 
j POSSOOOSSESEOSESESESESSESESEEEESOSEOOOSESEEESESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEOS 
3; ¢SUBTEST TYPE CONFIGURATION 
j POSOSSSSSSSSSSSESSSSESSESESOSEEESEEEEEEESEEEEOOEEEEEEEEEESEEEEEEEESEEEEEEENEEEEES 
j SOSSSSESSSSSSESSSESESSSSOSSOSESESESEOESEESEESEEEEEEEEEEEEEEEEEEEEEEEEEEODEEEEEEEES 


;CALL: MOV ON, RO sNeNUMBER OF CHARACTERS 
: MOV RO .R4 :BACKUP 
; MOV ox Ri s INDEX CONSTANT 
3 0v R1,RS ’ 
s CALL TCONF IG sACTUAL CALL 
5 RE TURN ;ONLY RETURN 
FS SSSSHSSSSSSSSSSSSSSESSSESSSESSSSHSESSSESSHESSSESSESESEEESESEHEEEEEEESEEESEEEEREEEEOEE 
3 eeesesesese 
3;e@e ERROR ee 
3; @eeeceseecese 
TCONF IG: TYPE ™SGO0O05 
18: BIT @BITO,CONFIG(R1) ;ERROR ON THIS BANK? 
BEQ 2s sNO - SKIP 
TYPE MSGO13 ;sPRINT “xX” 
BR 38 
2s TYPE ™SGO014 sPRINT SPACE 
38: ADO 04 ,R1 ;BuUPP POINTER 
Sos RO.18 ;LOOP TILL DONE 
MOV R4, 
MOV RS,R1 
peeseceseces 
;ee CPU'S ee 
3 @eeseseeese 
TYPE ™SG008 
4$: MOV COM IG(R1), a5 
ASH RS ;GET CPu BITS 
BIC @rci7 Rs ;CLEAR NON INTERESTING BITS 
TST Qs, :;IS THERE ANYTHING THERE? 
BNE 8s :YES - BRANCH. 
MOVs e 66k sNO - MOVE A BLANK INTO R5 
BR ot ;BRANCH OVER NEXT INSTRUCTION 
8s: ADO RS ;MAKE ASCII 
9%: re a :PLUG INTO MEMORY 
$oB8 RO .4% ;LOOP TILL DONE 
MOV R4, 
MOV R35,Ri 


34 
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3;¢¢ INTERLEAVE ee 


TYPE ™SG007 
;THIS IS AN ENTRY POINT FROM ERROR REPORTS 
010000 002630 ICFIGi: oN ee CONF IG-2(R1) 
000002 002626 BIT eBIT1. COM IG(RI) :;I1S THERE ANY MEMORY HERE? 
BNE 183% ;sBRANCH IF MEMORY PRESENT. 
000040 071644 MOVB e* .™SGO15 sMOVE A BLANK IN TO BE PRINTED 
BR 16% ;BRANCH TO TYPE ROUTINE 
000055 071644 18%: ~ a — 
$ 
002626 1s: MOV CONF IG(R1),R5S 
007777 BIC #*C170000 ,R5 ;GET CSR INTERLEAVE 
SWAB RS 
177774 ASH @-4,R5 
000012 CMP #10. ,R5 
BPL 2s 
00000 7 ADO @7,R5 
000060 2s: ADO @60,R5 sMAKE ASCII 
071644 MOvVB RS .MSGO15 :PLUG INTO MEMORY 
168: TYPE ™SGO15 
IF NOTAB NE @0O THEN SRETURN 
000004 ADD 04 Ri ;BUMP POINTER 
jo a of =~ ;LOOP TILL DONE 
MOV as. 7 
3 OS S6OS86ES60E806 
3;@@ MEMORY TYPE ee 
3 OSSO6608406460866466 
. LSB 
TYPE MSGOO09 
002104 002626 ITCFIG2: a. — ee 
002650 MOV CONF IG+2(R1).RS 
SWAB ;GET MEMORY TYPE 
177770 sic #tC7,Rs ;CLEAR NON INTERESTING BITS 
TST RS 
BEG 178% 
000004 BIT @BIT2.RS 
BNE 4% 
000102 071644 -— es 
000002 4%: BIT @BITi,RS 
BNE t 
000001 BIT @BITO,RS 
BNE 53 
000115 071644 - sane 
000113 071644 5%: a tear 
¢ 
000001 63: BIT eB1ITO.R5S 
BNE 78 
000114 071644 MOVB @’*..™SGO15 
BR 8s 


Sige Tree Cone Toumat FON. 


10537 
10538 
10539 


037672 


037674 


037752 
037754 
037756 
037760 


112737 
000405 
1127357 


062701 
077067 
010400 
010501 


000120 
000040 


000040 
002626 
000002 


170377 


MACRO 991115 


O7'1644 
071644 


071644 


rs. “OvB @' ? .™SGO15 
BR 8s 
178: MOVE & .™SGO1LS 
At: TYPE ™SGO0O15 
If NOTAB NE 80 THEN SRE TURN 
ADD 04 Ri ;BUMP POINTER 
RO, TCF IG2 ;LO00P TILi DONE 
MOV R4 RO 
MOV R35,R1 
.OSABL LSB 
peeeeooeses 
3;ee CSR ee 
j@esesecee 
TYPE mSGO016 
TCFIGS: MOVB e* ,™SGO15 
MOV CONF IGCR1).RS 
BIT @BIT1.RS 
BEG 168 
BIC @*C7400,.R5 
Rs, 
CMP #10. RS 
BPL 10% 
ADO @7,R5 
108: ADO #60 RS ;MAKE ASCII 
MOvVB RS .MSGO15 ;PLUG INTO MEMORY 
16%: TYPE ™SGO15 
IF NOTAB NE @0O THEN SRETURN 
ADO @4.R1 ;BUMP POINTER 
$oB8 RO, TCFIGS ;LO0P TILL DONE 
MOV R4,RO 
MOV R3,R1 
306620006006 5008 
3#¢@ PROTECTED ee 
3 28260666000 80686 
TYPE ™SGO10 
11%: TsTs CONF IG(R1) ;BANK PROTECTED? 
BPL 12s ;NO - SKIP 
MOVB @'P.™SGO15 
BR 13% 
12%: BIT @BIT6,. CONF IG(R1) sPROTECTED REGION OF ECC? 
BEG 14% sNC - SKIP 
MOVE @#'I,MSGO15 
138: TYPE ™SG015 
BR 15% 
14%: TYPE mSG014 sPRINT SPACE 
158: ADO 64 ,R1 ;BUMP POINTER 
S08 RO,11% s;LOOP TILL DONE 
MOV R4, 
MOV R35 ,R1i 


CZMSDDO S11 . -™ DIAGNOSTIC 
PARIT: ERROR HANDL 


TRAP 


10554 
10555 037762 
10556 037770 
10557 037772 
10558 037776 
10559 


MACRO ™111% 


002074 


1“? 
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.SBTTL TRAP 


PARIT: ERROR HANDLER 


§ SF SSSSSSSSSSSSSSSSSESSSESSSSESSESSSESESSSSSSESSESESSESSEEESEEEEESESEEEEEEEHEHEEEEEEEEES 


sVECTOR TO HERE FROM TRAPS TO 114 


s IGNORE ERRORS GUT COUNT IF NOPAR FLAG + 1. 





SET “ABORT” 4 SETUP "BADPC’ / RETURN VIA PCBUMP 


;COUNTING PARITY ERRORS? 
sNO - SKIP 
;PARITY ERROR COUNTER - 1 


sACTION CODE + 2 ? 
: - SKIP 
; YES 

iF IND BAD SP,.PC.PSwW OFF STACK 
;UPDATE RETURN PC 

;SHOW FAILURE BY .NE. 


sACTION CODE = 3 ? 
NO SKIP 


3 CODE ACTION 
; as —s 
; re) PRINT UNEXPECTED PARITY TRAP 
; 4 COUNT ERROR 
; 
; 5 RETURN VIA “PARTHERE ~ 
i 
PARITY: CMP @1,.NOPAR 
PINE is 
INC PARCNT 
RTI 
18: cmp 
BNE 
SET 
CALL 
ADO PCBUPP , (SP ) 
25 eBIT2,2¢SP) 
28: CMP @3,NOPAR 
BNE 3% 
Ov PARTHERE ,( SP) 
3$: CALL BADS TACK 


FATAL 32 


sFIND BAD SP,PC.PSW OFF STACK 


MS1i ./™ OIAGNOSTIC 
NON EXISTANT MEMORY (HOLES) MANDLER 


004737 


004737 


000001 


002066 
000001 


002032 


040170 


040170 


000004 002050 


MACRO 11153 


002076 


002066 


Ji 
./** 
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.SBTTL TRAP NON-EXISTANT MEMORY (HOLES) HANDLER 
§ PP SOSSSOSSSSOSSHSSESS OSE SOSOSEOEEEESOSESSEESEEEEESEOEOEEEEEEEEEEEEEOEE OE OESEEEES 


;VECTOR TO HERE (SOMETIMES) FROM TRAPS TO 4 


; CODE IN NONEM DETERMINES ACTION AS FOLLOWS: 
s 1) IGNORE ERRORS BUT COUNT IF NONEM (NO NON-EXISTANT MEMORY) FLAG = 1. 
; 2) TO EXIT PATTERN O DURING SIZING IF NON-EXIST MEM ERROR 


NONE XIST: CMP @1.NONE™ sCOUNTING NON-EXISTANT MEMORY ERRORS? 
BNE 2s sNO - SKIP 
INC NEMCNT ;8UPP NON-EXISTANT MEMORY COUNTER 
céMP @1,NEMCNT sFIRST ERROR? 
BNE is :NO - SKIP 
= art RO, ADDRESS sASSUME RO CONTAINS THE ADDRESS ACCESSED 
2s: INC NEMCNT ;BUMP NON-EXISTANT MEMORY COUNTER 
4 #1,R1 ;OUMMY UP R1 FOR A FORCED SOB EXIT 


§ FSSSSSSSSSSSSSESESESESESSEESSESSESSESSESSEEESESS*SEESESEEEHEESESHOEEESESEOHESOEEEEEES 


-SBTTL TRAP TIMEOUT (TRAP TO 4) HANDLER 
TIMEOUT : ‘CALL ~_— ACK sFIND BAD SP,.PC,PSwW OFF STACK 


§ SSSSSSSSSESSSSSSSESESSSEESSESSSESESESESEEESESESSSESESSEHESESSESSEESESESESEEEHEEEEEEEEEEEEEEEES 


-SBTTL TRAP MEMORY MANAGEMENT (TRAP TO 250) HANDLER 

MMTRAP : 7% BADS TACK sFIND BAD SP,PC.PSW OFF STACK 
-SBTTL TRAP RESERVED INSTRUCTION HANDLER 

tem = % : TACK sFIND BAD SP,PC,.PSwW OFF STACK 


BADSTACK:SUBTST <<F IND BAD SP, PC. E PSW FROM STACK>> 


£ FSSSSSESSESSSESESSSSESSESSESSSESSESESEEESSSEEEEEEEHEEOEESEOEEESEESEESEESESEEESEEHOEOEOEEOEE 


; ¢SUBTEST FIND BAD SP, PC. E PSW FROM STACK 
F SFSSSSSHESSSSSSSSSSSSSSESSSSESESSSESESESSEEEEESEEEESEESEEEEEEEESEEEEEEEEEHESEHEHESOEHEOOEE 
MOV -BADSP 
ADD @2 ,BADSP 
MOV 2( SP) ,BADPC 
4(SP), BADPSW 


MS1i-./™ DIAGNOSTIC 
KERNEL TRAP HANDLER 


042766 
000002 


052737 
000002 


042737 
000002 
005737 
001406 
013737 
052737 
000002 


005737 
001403 


053737 
000002 


140000 
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000002 


177572 


177572 


177746 
177746 


177746 


iMG 


SEQUENCE 


.SBTTL TRAP KERNEL TRAP HANDLER 


FF SSSSSSSSSSSSSSSSSSSSSESSESSESSESSESESSESEESSESEESEESESESESESEEEEEEEEESER ORE REEEEEE 


;KERNEL IS A TRAP THAT COMES HERE 


FS SSSSSSSSSSSESSSESSSSESSESESSESESESEESESESESESESEESESESEEEEEEEEEESEEEEEEEEEEHEEEE ORE EEE 


eee BIC #140000, 2( SP ) 

j SPSS SESESESEESEEESESESEESESESESEEESESES OE OOEEESOOEEEEEEEEEEOEEEEEEEEEEEDOEEEEES 
-SBTTL TRAP ENERGIZE TRAP HANDLER 

ae BITO,MMRO 


§ PROCESSES ESESEEEEEESEOHESESEEEEEESEEEESESEEESERESEEEEEEEEEREEEOEEDEEEEEEEEEES 
-SBTTL TRAP DEENERGIZE TRAP HANDLER 
ee . ee BITO,MMRO 


§ POSSESSES SEEEEESEEOEEEEEEERSEEESESESESEEEEESEEEEEEEEOEESEEEEEEEEEEEOEDEEEEEOES 
.SBTTL TRAP CACHON TRAP HANOLER 
sCACHN: ace CACHKN 3IS THERE A CACHE 


1% ;NO - RETURN 
MOV CACHKN , CONTRL sSETUP CACHE AS PER CONSTANT (USUALLY 1 = FULLY ON) 
¥ as @BITO,CONTRL ;DISABLE TRAPS (BUT NOT ABORTS) 


§ SSSSESSESESSEESSESESSEESSESESESASSEESESESEEESEESEHEEEESEEEEEASEEEHEEEEEEEEEHESEEEEEEEEES 


-SBTTL TRAP CACHOF F HANDLER 
sCACHF: {ST CACHKN 3IS THERE A CACHE? 

BEG is ;NO - RETURN 

sDISABLE TRAPS (NOT ABORTS), FORCE MISSES, FLUSH, BYPASS 
- 4, CACHKF , CONTRL 


002146 
172100 


MACRO M1113 14 


002146 


002144 
172100 


002144 


i +4 
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- SBTTL 


TRAP 


LOAD CSR TRAP HANDLER 


sLOAD CORRECT CSR WITH DATA IN CSR 
;PROGRAM CSR'S ASSERT INHIBIT MODE POINTER WHEN LOADED 








$_OADC: PUSH RO Ri sSAVE REGISTERS 
MOV CSRNO ,RO ATE CSR ADDRESS 
IF INMECC IS TRUE THEN GOTO 33 3;D0N'T WANT INH. MODE POINTER ON 
TST PGMCSR ;PROGRAM IN INTERLEAVED SPACE ? 
is sBRANCH IF NOT 
MOVB PGMCSR+1,R1 sCHECK SECOND CSR 
BIC orC37,R1 sCLEAR UNNECESSARY BITS 
CMP R1,CSRNO :IS THIS THE CURRENT CSR? 
BEG 2s sBRANCH IF IT IS 
i$: CMPB PGMCSR , CSRNO :1S THIS THE CURRENT CSR? 
BNE 3% ;BRANCH IF NOT 
2s: BIS e6I1T13,CSR iSET "ale INHIBIT MODE POINTER TO 
38: MOV CSR .CSRADOD( RO) sLOAD THE CSR 
“4 R1,RO sRESTORE REGISTERS 
-SBTTL TRAP READ CSR HANOLER 
;READ THE CORRECT CSR INTO LOCATIONS CSR 
SREADC: PUSH RO 
MOV CSRNO RO 
MOV CSRADDCRO).CSR sREAD IT 
. 


f 4 ' nC 


iST 16K 


Te 


040624 
0406 30 


L/™ OF 
(R1) € 


172100 
002146 


002144 


002146 


003720 


177776 


. SBTTL 


STSTRO: PUSH 


TSTRO1: 
T 


BEQ 
CALL 
BR 
CAL 


BIS 
LSE 
BIC 


END ;OF 
RTI 





M4 
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TRAP 
RO,R2 RS 
SRADO 


T 
FASTCITY 


@BITO,2¢SP) 


eBITO,2(¢SP) 
IF @#BIT4 





TEST (R1) E€ READ CSR CAREFULLY 


sCREATE CSR ADDRESS 


i1S THIS AN 11744? 
;sBRANCH IF IT IS 


EG ANCE 


sCALL TO THE USER INSTRUCTION PAR'S 
ta SINGLE BIT ERROR ONLY - SET CARRY BIT 


R3,R2,RO 
IF #6114 SET.IN CSR AND @BIT1S OFF.IN CSR 


;V177640 
3V177642 ;ENTER SUPERVISOR MODE 
3V177646 
3V¥177650 
3V¥177656 
3V177662 


“o> 


ZMSODO 


NG 


MS11-./M DIAGNOSTIC MACRO M1113 14-JAN-62 16:15 PAGE 331 JE QUENCE 
ECC OISABLE ALi CSR’S TRAP HANDLER 
.SBTTL TRAP ECC DISABLE ALi CSR‘S TRAP HANOLER 
0406352 012737 000002 002144 sECCDIS:MOv e61T1.CSR 
040640 004737 041356 CALL CSROUT 
040644 000002 RTI 
-SBTTL TRAP ECC DISABLE OF 1 SELECTED CSR TRAP HANDLER 
040646 012737 000002 002144 sECCIDIS:MOV oBIT1.CSR 
040654 104425 LOADCSR 
040656 000002 RTI 
-SBTTL TRAP INITIALIZE ALL CSR‘'S TRAP HANDLER 
040660 012737 000001 002144 %sECCINIT:MOv @BITO,.CSR 
040666 004737 041556 CALL CSROUT 
040672 000002 RTI 
-SBTTL TRAP INITIALIZE 1 SELECTED CSR TRAP HANDLER 
040674 012737 000001 002144 SECCIINIT:MOvV éBITO,CSR 
040702 104425 LOADCSR 
040704 000002 RTI 
-SBTTL TRAP ENABLE SBE PARITY TRAPS ON ALL CSR'S 
040706 012737 002144 sENASBE : MOV #BITO!:BIT1,CSR 
040714 004737 041556 CALL CSROUT 
040720 RTI 
-SBTTL TRAP ENASLE SBE PARITY TRAPS ON 1 SELECTED CSR 
040722 012737 000005 002144 ‘sENALSBE: @BITO!BIT1.CSR 
040730 104425 L 
040732 000002 RTI 
-SBTTL TRAP WRITE CHECKBITS THRU ALL CSR’'S TRAP HANDLER 
040734 013737 002276 002144 ‘%sCBCSR: MOV CHECK ,CSR s;BITS 11-5 
040742 052737 002144 BIS @BIT1:BIT2,.CSR ;CHECK MODE 
040750 004737 041556 CALL CSROUT 
040754 000002 RTI 
-SBTTL TRAP WRITE CHECKBITS THRU 1 SELECTED CSR TRAP HANDLER 
040756 013737 002276 002144 ‘sCBICSR:MOV CHECK CSR sBITS 11-5 
040764 052737 000006 002144 BIS eBIT1i!BIT2,.CSR ;CHECK MODE 
040772 104425 L 
040774 000002 RTI 


‘sa 


CZMSDDO MS11-./™" DIAGNOSTIC MACRO 1115 m4 JAN-82 16:15 PAGE 3535 SE Ge WCE 
TRap WAS THERE A SBE ON ANY CSR TRAP HANDLER 

10750 .SBIT TRAP WAS THERE A SBE ON AN’ CSR TRAP HANDLES 

10751 0640776 SWASSBE : PUSH R14 

10752 041002 013701 002220 Ov TOTCSRS,R1 3GET CSR’S Brie 

10753 041006 005004 CLR RS 

10754 041010 — LwSBE 

10755 041010 OR CSRNO :- “ TO #36 BY @2 

10756 041014 006301 AS. a 

107S7 061016 ON. ERROR 

10756 041020 104426 ADCSR 

10759 041022 If #61:4 SET.IN CSR 

10760 041052 SET 

10761 041036 LEAVE LwWSBE 

10762 041040 END ;OF IF eBIT4 

10763 041040 END ; OF ON.ERROR 

10764 041040 IF Ri EQ @O THEN LEAVE LwSBE 

10765 061064 END ;OF F CSRNO 

10766 041062 END _WSBE 

10767 041062 006004 is | o4 ;SET C BIT FOR ERROR 

10766 041064 POP R4 R11 

10769 041070 ON. ERROR 

10770 041072 052766 000001 000002 BIs @BITO,.2( SP) 

10771 041100 ESE 





BIC *@BITO,2(SP) 
3s0F ON. ERROR 














10775 . SBTTL WAS THERE A SBE IN i bi CSR TRAP HANDLER 
10776 ON neTUNN T IF CARRY IS SET THERE WAS A SBE 

10777 O@1112 106426 $WAS 1SBE : READCSR 

10778 041114 042766 000001 000002 BI @BITO,2( SP) :;CLR C BIT ON STACK 

10779 041122 032737 000020 002144 @BIT4,.CSR 

10760 041130 001403 is 

107861 041132 766 000001 000002 @BITO,2¢ SP) sSET C BIT ON STACK 

10782 041140 1%: 





10618 041304 


0135701 
005004 


006301 
104426 


MACRO Mi 
CSR TRAP 
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-SBTTL TRAP WAS THERE A DBE ON ANY CSR TRAP HAND. ER 
SWASDBE : PUSH Ri, 
roy! on sGET CSR’'S Brie 
BEGIN MOBE 
~— —_— 3° 00 TO #36 BY @2 
i 
ON. ERROR 
READCSR 
If @BIT15 SET.IN CSR 
SET Ra 


LEAVE LWDBE 
END ;OF IF eBIT4 
END ;0F ON.ERROR 
IF Ri éQ @0O THEN LEAVE LWOBE 
END ;OF FOR CSRNO 
END LWOBE 


POP 


;SET C BIT FOR ERROR 
R4 Ri 


ON. 
BIS #BITO,2¢SP) 
SE 


EL 
BIC e@BITO,2¢SP) 
of :0F ON. ERROR 


RTI 
-SBTTL TRAP WAS THERE A DBE ON 1 SELECTED CSR TRAP HANDLER 
sON RETURN IF CARRY IS SET THERE WAS A DBE 
$WAS10BE : READCSR 
TST OBE ? 


BPL 3% sNO - SKIP 
att @BITO,2¢SP) ;SET C SIT ON STACK 
5$; att eBITO,2(SP) ;CLR C BIT ON STACK 


ot @ a WE 


UD‘, 
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7 aren cee AR ALL inde es TRAP HANDLER —_ 

10621 .SBTT™. TRAP CLEAR ALL ECC CSR’S TRAP HANDLER 

10822 041506 sCLRCSR: CLEAR SR 

10625 041312 O0O6737 041356 CALL CSROvT 

10624 041516 000002 RTI 

10625 .SBTTL TRAP CLEAR 1 SELECTED CSR TRAP HANDLER 

10626 0461520 SCLRICSR:CLEAR CSR 

10627 041324 1046425 LOADCSR 

10826 0415326 RTI 

108629 .SBTTL. TRAP ECC DISABLE, CHECK MODE. € WRITE CHECKBITS IN Ait CSRS TRAP ~ANDLES 

10830 sCHECKBITS ALREADY IN LOC “CSR” 

10631 041330 052737 000006 002144 ‘sCHKDIS:8IS @BIT1:eIT2,.CSR sECC DISABLE € DIAG CHECK MODE 

108632 041336 004737 0415356 CALL CSROuUT 

10633 041342 

10634 .SBTTL. TRAP ECC DISABLE, CHECK MODE, &€ WRITE CHECKBITS IN 1 SELECTED CSR 

10635 ;CHECKBITS ALREADY IN LOC “CSR” 

10636 041344 052737 000006 002144 %s%CHKIDIS:BIS @BITLIBIT2.CSR sECC DISABLE € DIAG CHECK MODE 

10637 041352 104425 LOADCSR 

10838 041354 000002 RTI 


CZMSDDO S11 ./™ DIAGNOSTIC 
ECC OILSABLE. CHECK “ODE. £ WRITE CHECKBITS IN 1 SELECTED 


TRap 
10841 


041 556 


0135701 


006301 
104425 


013701 
006301 
006301 
042761 
000002 


002220 


002100 


020000 002650 


Ae! 
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CSROUT: SUBTST <<SUBR WRITE IN ALi CSR’S>> 


3; @SUBTEST SUBR WRITE IN ALL CSR’S 


PUSH Ri 

OV TOTCSRS.R1 ;GET CSR'S Brie 
:* @0 TO #36 BY e@2 
Ri 


BEGIN LCSROUT 


LOADCSR 
END ;OF ON.ERROR 
IF R1 EQ @O0 THEN LEAVE LCSROUT 
CSRNO 


SINVALID: SUBTST <<TRAP INVALIDATE BACKGROUND PATTERN>> 


§ SSSSSSSSSSSSSESSESSSSSSESSESSESSESSESESHESEESEESSEEEEESESESSEESESEEESEEHEEEEESOOEESESE 


;@SUBTEST INVALIDATE BACKGROUND PATTERN 


£ FSSSSSSSSSSSESSSSESSSESESESSSSESESSESEEESSEEEEESSEEESESESSESEESEHEESESERESEEEEOEESEEESEEE 


oR1 
MOV BANK RI 
R1 


ASL 

ASL Ri 

BIC @BIT13,CONFIG-2(R1) 
att R1,.RO 


CZMSDD0 MS1i ./™ OIAGNOSTIC 


"Rap 
10865 041454 


706 
10916 041712 
10917 041722 


013705 
0os 


INVALIDATE BACKGROUND PAT 


002102 
0024 50 
172246 
177646 
177773 
002150 


177600 


177775 


002144 
177773 
177600 
002426 


002150 


002146 
040000 
172100 
040000 


177037 


002432 
002064 


sie 1115 


172100 
172100 


SERRGEN: 


a 
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SuUBTST<<« TRAP 


GENERATE AND TEST ERROR ADDRESS-> 


; *SUBTEST TRAP GENERATE AND TEST ERROR ADDRESS 
§ FSSSSSSESSSSSESSSESSSSSSSSSSSSSSESESESSESSESSESSESSSSESESEEEESSEEEEEEEEEEEEEEESEEEEE SESE 
RO.R1,R2,R5 
MOV BANK INDE x ,R5 
TST NOSUPER 
BNE 66 
~ ee ;GENERATE WHAT ERROR ADDR SHOUD BE 
65: MOV UIPARS .RO 
7$: ASH @-5,R0 
TST EUFLAG 
BNE is 
BIC @*C177,R0 
18: SWAB R1 ;GET CURRENT ADDRESS BITS 11 AND 12 
ASR ey 
ASR R1 
ASR Ri 
BIc erc2,Ri 
ADO R1,RO sADD THEM TO THE ADJUSTED PAR VALUE 
;GET ERROR _— FROM CSR UNDER TEST 
MOV CSR ,R1 
ASH @-5,.R1 
BIC @*C177.R1 
TsT NO228IT :IS THIS AN 11/44 OR 11/24? 
BNE 2s sBRANCH IF NOT NECESSARY 
TsT EUFLAG :IS IT EvB? 
BEG 2s sBRANCH IF NOT 
sSAVE GENERATED ERROR ADDRESS 
MOV CSRNO ,R2 sGET CSR NUMBER 
BIS @81T14, CSRADOCR2) ; TURIN ON EUB BIT CAREFULLY 
MOV CSRADOC sGET CSR CONTENTS 
BIC #81116. CSRADOCR2) | TURN OFF EUB BIT CAREFULLY 
oy hia ;CLEAR EVERYTHING BUT ERROR ADOR 
ASL RO ;SHIFT ADOR BITS 18-21 INTO POSITION 
poo = sADD TO CURRENT ERROR ADDRESS 
2s: chp RO ,R1 sCOMPARE REAL AND GENERATED ERR. ADDR. 
6EQ 58 sBRANCH IF THEY ARE THE SAME 
TsT INTFLAG s INTERLEAVED? 
BEG 36 ;NO - WE HAVE AN ERROR 
ADO #100 ,R0 
TST INT64K 364K INTERLEAVED MEMORY? 
BNE ai 
ADD #100,RO0 
4%: CMP Ri 
BEG Ss 
3%: TST SKPERR TO SKIP ERROR P.0.? 
BNE S$ ;YES - SKIP ERROR PRINTOUT 
PERR 36 sELSE PRINT ERROR ADORESS ERROR 
5$: MOV R1,ERRADD sSAVE CSR‘'S ERROR ADDRESS 
CLR SKPERR sENABLE THE ERROR PRINTOUT AGAIN 
os R3,.R2,R1,RO sRESTORE REGISTERS 


002276 


a 


mi115 
S 
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CHKGEN: SUBTST<<SUBR GENERATE CHECK BITS>»> 
§ POOSOSOSHSEEESESOSESESEEEEEEOEEEEEEESESEEOEEEEEEEEEEEEEEEEESEOEEOEEEEEEEEEEEEEES 
; *SUBTEST SUBR GENERATE CHECK BITS 
j POPOSOSESESSEEOEEESEESEESESEESESEESSEESESOEESEESESEEEEEEEEEEEEEEEEEESEEEEEEEEOEES 
:CHECK BIT GENERATOR ROUTINE 
sCALLING SEQUENCE IS: 


MOV @WORD1,SOURCE ;SOURCE - ADDRESS OF DATA 
3 CALL CHKGEN 
CHECK BITS RETURNED IN BITS 11-5 OF LOCATION CHECK 
PUSH RO.RL.R2,RS,R4,RS 
MOV 077,R2 }DEFAULT CHECKBITS FOR DOUBLE WORD OF ZEROS 
MOV OCHKTAB ,.R3 ;ADORESS OF CHECKBIT TABLE 
MOV SOURCE , ;GET SOURCE ADORESS 
MOV (R5)+,R1 iGET LSB'S 
MOV ¢R5), iGET MSB'S 
1s: SxT Ra ;EXTEND SIGN OF DOUBLE WORD TO R4 
BICB (R3)+,R4 ;ELIMINATE BITS THAT DON’T COUNT 
XOR Ra ,R2 ;COMPLEMENT MASKED BITS IN CHECKBITS 
ASHC  @1_RO ;DOUBLE PRECISION LEFT SHIFT RO, .R1 


BNE is ;LOOP TILL ALL BITS ARE CHECKED 


BIC @?tC177,R2 L ALL JUNK BITS 
R2 ;POSITION CHECKEITS IN BITS 11-5 
ASR Re 
ASR Re 
ASR Re 
MOV Re , CHECK 
Poe RS R44, RS.R2O,R1L.RO 
RE TURN 
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sB1TE @3 


BrTe 


OerNMwavignan @wo 
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SUBTST<<SUGR MAPPER >> 
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AE GUENCE 


4 FS SSSSSSSSSSSSSSSSSESSSSSESSSESSSSESSSEEEESSEESESSESESESEESSEESEEEEEESEEEOEEE EE EOEEEOEOEES 


; ¢SUBTEST 


; THIS SUBROUTINE MAPS THE ME 


MOR (16K 
;IN RS TO THE TEST PATTERN AREA (SUPERVISOR VIRTUAL (60000 - 
; THE 11744 AND 11/745-55; USER VIRTUAL (60000 - 


;PDP-11°S). 

: 

;CALL MOV BANKNO .R3 

: CALL MAPPER 

; RE TURN 

MAPPER: PUSH RO.R1,.R2,R4,R 
MOV @KIPARO ,RO 
MOV @SIPARO,R1 
MOV @SIPORO ,R4 
TsT R 
BEQ 4¢ 
MOV ye te Sat 
MOV RS 

18: MOV CRO)+,CR1)- 
MOV oC R4)> 
SOB RS.18 
MOV #177600, -(R1) 
3 SE 
CoP #120., 
sf£Q 3% 

ASH o9. RS 
MOV @SIPARS.R1 
TST NOSUPER 
8EQ Ss 

MOV @UIPARS .R1 

S$: MOV o4, 

2%: MOV R3.CR1)- 
ADO #200 ,R3 
$08 R2,26 
TST SPL TCSR 
BEG 3 
SUB #10,R1 
many 1,R2 
ADO »R2 
CMP #1,SPLTCSR 
BEG Os 
MOV R2,RO0 
MOV R1,R2 
MOV oR1 

10$: MOV CR1)+,(R2)> 
MOV CR1),CR2) 
MOV x, 


e~ 
yo 
o~ 
~ 
~s 
en 


WORDS = 1 BANK) 
157777) FoR 
157777) FOR ALL OTHER 


;SET UP BANK ARGUEMENT 
;ACTUAL CALL 
;ONLY RETURN 


sSET SUPERVISOR/USER » FOR 1 TO 1 MAP 


sFIRST AREA TO MAP TO 

sFIRST ADDRESS REGISTER 

sFIRST DESCRIPTOR REGISTER 
— WE USE SUPERVISOR MODE? 

é ) 

;FIRST ADDRESS REGISTER 

sFIRST DESCRIPTOR REGISTER 
;CONSTANT FOR 4K PAGE, UP, R/wW 
; COUNTER 

sPUT IN SUPERVISOR ADDRESS 
sPUT IN SUPERVISOR DESCRIPTOR 
sLOOP TILL DONE 

;CORRECT LAST FIELD FOR PERIPHERALS PAGE 


T WP — ae FOR TEST AREA 


sMAP NOTHING (1 TO 1)? 

sYES - SKIP 

sBANK 1 STARTS AT 100,000 LESS 6 LSB'S 
:FOR MEMORY MANAGEMENT = 1000 
;SETUP FOR AUTO INCREMENTING 
:00 WE HAVE SUPERVISOR MODE? 
;YES - BRANCH 

;SETUP FOR AUTO INCREMENTING 
s COUNTER 

:PLUG IN PAR INFO 

;BUMP ADDRESS 4k 

;LOOP TILL DONE 


«6! 


MS11-./™ OITAGNOSTIC 
MAPPER 


000207 


MACRO M1115 i4 JAN-82 16:15 PAGE 346-1 ED 
MOV ©4000 ,RO 
BR 128 
118: #10000 .RO 
12s: Ts! e 
BEG 138 
MOV ee 
15%: MOV @SIPARS .R1 
14%: ADD RO,CR1)> 
RO,.CR1) 
IF WE ONLY HAVE AN 124K SYSTEM, WE DON'T WANT TO TEST THE 
;LAST 4K, WHERE THE UNIBUS DEVICE PAGE IS. INSTEAD, THE 
:PROGRAM WILL REMAP THE LAST 4K TO 8-12K. ALSO, IF THERE 
3IS A BANK 177 ON AN 11/744, THE PROGRAM WILL REMAP THE LAST 
34K TO 6-12K FOR THE SAME REASON. 
002530 93: CmMP @7,LASTBANK 
BNE 78 
TST NO22BIT 311744 OR 24? 
BEQ 3% sBRANCH IF SO 
002100 CMP 07. BANK sBANK 7? 
BNE ‘ ;NO - BRANCH 
BR 8s 
0025350 78: CMP @177,LASTBANK 
BNE 3% 
8%: TST NOSUPER 
BEQ 64 
177654 ~ 4 a 
172254 6%: MOV SIPARS , SIPAR6 
38: POP RS .R4,.R2,R1,RO 
RETURN 
.SBTTL TRAP MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER 
SKMAP ; PUSH RO,.R1,R2,R35.R4 
CLR RO :1ST AREA TO MAP TO 
MOV @XIPARO Ri ;FIRST ADORESS 
MOV 077406, R2 ;CONSTANT FOR 4K PAGE,UP,R 
MOV @XIPORO, R3 ;1ST PAGE DESCRIPTOR REGISTER 
MOV . R4 ; COUNTER 
L$: MOV RO, CR1)-> ;PUT IN KERNEL 
MOV R2,C(R3)- sPUT IN KERNEL DISCRIPTOR 
ADD »RO sADD ADDRESS CONSTANT FOR 4K CHANGE 
$08 218 ;LOOP TILL DONE 
MOV #177600, -(R1) ; THE PERIPHERALS PAGE TO KIPAR?7 
MOV #177400, -(R1) ;AND NEXT LOWER PAGE TO KIPAR6 
POP R4.RS,R2,R1,.RO 


>] 
~ 
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( 
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RELOCATE: SUBTST <<RELOCATE PROGRAM>> 
5 PSSSSSSOSSSSSSSSESSESSSSESESSESEEEEESESESEEESESEEEEEEEEEEEEEEEEEEEEEEEEEEE EEE EEEE 
;*SUBTEST RELOCATE AM 
§ SSS SSSSSSSSSESSSESSSSESESEESESESSEEESEEEEEEEESEEEEEEEEOESEEEEEEEEEEEEEEEEEEEEEEEEES 

IF @SW12 SET.IN @SWR THEN SRETURN ERROR 

If APTFLAG IS TRUE OR ACTFLAG IS TRUE 

IF SPASS NE @O THEN SRETURN ERROR 
END; OF IF APTFLAG 
BEGIN LOADERBANK 


ty arg F :* #1 TO LASTBANK 
L 
IF ACFLAG IS TRUE AND PFLAG IS FALSE AND BMFLAG IS FALSE 

MOV BANK ,RO 
MOV RO, LOADBANK 
MOV L RI 
CALL BANKMOV 
CALL NEWLOAD ;MAP NEW LOADER BANK IN KERNEL 
MOV BANKINDEX,R1 
BIS @B1T15.CONFIG+2(R1) sMARK LOADER 
BIC @BIT13,CONFIG-2(R1) ;INVALIDATE BACKGROUND PATTERN 


LEAVE LOADERBANK 
END ;OF IF ACFLAG 
END ;O0F FOR BANK 
IF eswi3 OFF .IN @SWR 
TYPE MSGO75 
END ;OF IF @Swi3 
SRETURN ERROR 


sRELOCATION NOT POSSIBLE 








Re ~ <- R204 
FOR R1 :* @2e2 TO R2 BY 04 
IF @BIT7!BITO OFF .IN CONFIG(R1) ;IF NO ERRORS € NOT PROGRAM SPACE 
IF #BIT1S OFF. IN CONFIG+2(R1) ;IF NOT LOADER BANK 
IF CPUBIT SET.IN CONFIG(R1) ;IF ACCESSABLE 
IF @#BIT9 SET. IN CONFIG+2(R1) THEN LEAVE FINDGANK ; IF PARITY 
IF @#BIT6 SET. IN CONFIGCR1) AND OBIT? OFF .IN CONFIG(R1) 
sIF 1ST PROTECTABLE ECC BANK 
LEAVE F INDBANK 
END ;OF IF @BIT6 
IF INMECC IS FALSE 
INHECC 


;IS THIS PATTERN 50? 
;YES - SKIP MESSAGE 





BR 
END; OF IF INHECC 


t * a. *. 
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CZ™SODO 1 ./™ OITLAGNOSTIC 
RELOCRTE PROGRAM 


11152 0435114 005037 002510 c.R INMECC ;MAKE SURE FLAG IS TURNED OFF! 
11155 043120 If @SW15 OFF .IN @SWR 

11154 0431350 025727 002262 900030 CMP REALPAT ,.@30 iIS THIS PATTERN 307 

11155 043136 001402 BEQ SKUB. :YES - SKIP MESSAGE 

11156 0435140 TYPE ™SGO75S sRELOCATION NOT POSSIBLE 
11157 043144 END ;OF IF @Swis 

111586 0435144 SKUB : SRETURN ERROR 

11159 045150 END F INDBANK 

11160 0435150 CLEAR INHECC 3IF WE RELOCATED PROPERLY. THIS SHOULD SE OFF! 
11161 043154 042761 020000 0026350 RELENTI: BIC @BIT15,CONFIG-2(R1 ) : INVALIDATE BACKGROUND PATTERN 
11162 0435162 CLR 

11165 043164 071027 000004 OIv 4 ,RO 

11164 045170 RELOCi: LET NEWBANK := RO 

11165 0465174 013737 002504 002506 MOV PGMCSR ,PGMCSR +2 sSAVE CURRENT PGM. CSR 

11166 043202 004737 044120 CALL ;MAP NEWBANK TO USER PAR 
11167 043206 USER sENTER USER MODE 

11168 0435214 BMOV 0, 100000, SIZE sMOVE PROGRAM 

11169 043226 104417 KERNEL sENTER KERNEL MODE 

11170 043250 022737 000001 003720 CMP @1,PROTYP sIS THIS AN 11/744 ? 

11171 043236 001021 BNE JPRL1 ; JUMP IF NOT 

11172 043240 042737 172516 BIC oSITS .-mRS ;TURN OFF UNIBUS MAP 

11173 043246 013700 002272 MOV NEWBANK ,RO 

11174 043252 ASR RO 

11175 0435254 ON. ERROR 

11176 043256 012737 100000 170200 MOV @BIT15,MAPLO 

11177 043264 END ;OF ON. ERROR 

11178 043264 010037 170202 MOV RO, MAPHO 

11179 043270 004737 043706 CALL L ;SETUP LOWER 16K IN UNIBUS MAP 
11180 043274 052737 000040 172516 6Is @6ITS .-eRS sENERGIZE UNIBUS MAP 

111861 043 042737 000001 177572 JMPRiL1: BIC e6ITO,MMRO sDEENERGIZE MEMORY MANAGEMENT 
11162 043310 004737 044202 CALL NE WKERNEL 

11183 043314 013700 002272 MOV NEWBANK , RO 

11184 043320 006300 ASL 

11185 043322 006300 ASL RO sRO <- RO « 4 

11186 0435324 016002 002626 MOV CONF IG(RO),R2 

11187 043330 000302 SWAB R2 

11166 0435332 042702 177760 BIC #*1C17,R2 

11189 043336 ASL R2 

11190 043340 052737 000001 177572 BIS SBI TORO sENERGIZE MEMORY MANAGEMENT 
11191 043346 010237 002504 MOV R2,PGNCSR sPUT NEW PGM. CSR INTO PGMCSR 
11192 043352 032 010000 002650 BIT @BIT12,CONFIG-2(RO) 3IS THE NEW BANK INTERLEAVED? 
11193 043360 001412 BEG is ;BRANCH IF NOT INTERLEAVED 
11194 043362 016002 MOV CONF IGCRO),R2 

11195 043366 042702 007777 BIC @*C170000 ,R2 

11196 043372 072227 177775 ASH @-3, 

11197 043376 052702 i BIS #6IT15,R2 

11198 04 050257 BIS R2 ,PGMC 

11199 04 1s: SET RLFLAG 

11200 043414 SRETURN NOERROR 


END; OF IF FIALREL 


rat 
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11203 043420 UNRELOCATE : SUBTST <<UNRELOCATE PROGRAM> > 
§ FSSSSSSSSSSSSSSSSSSSSSSSSSSSESSSSESESESSSESESESESESESESESSEESSESESESESEEESER EOE OEEEEEEEEE 
; «SUBTEST UNRELOCATE PROGRAM 
§ SSSSSSSSSHESSSSSSSSSSSSSSSESSSSSESSSESEEHSESEHSSEEEHEEEESEEHESEEEEEEEEEESEEEEEEEEEOEEEES 
11204 ;RESTORE LOADERS 
11205 043420 PUSH RO 
11206 043422 013701 002404 LOADBANK , 21 
11207 043426 013700 LOADHOME , RO 
11206 043432 004737 043752 BANKMOV 
11209 043436 004737 044250 NEWLOAD ;MAP NEW LOADER BANK IN KERNEL SPACE 
11210 043442 BANK 
11211 043446 013737 002404 002100 LOADBANK , BANK 
11212 043454 004737 044302 E XBANK 
11213 043460 013701 002102 BANK INDEX ,R1 
11214 043464 042761 100000 002630 @BIT1S,CONFIG-2(R1) ;CLEAR LOADER FLAG 
11215 043472 013737 002540 002100 LOADHOME , BANK 
11216 043500 004737 044302 E XBANK 
11217 043504 013701 002102 BANK INDEX ,R1 
11216 043510 042761 020000 002630 @BIT13.CONFIG-2(R1) ;INVALIDATE BACKGROUND PATTERN 
11219 0435516 BANK 
11220 043522 INHECC ;MAKE SURE ECC TESTS ARE NOT INHIBITED! 
11222 STORE BANK 0 
11223 043526 042737 020000 002630 @81T13,CONFIG+2 ; INVALIDATE BACKGROUND PATTERN 
11224 045534 :* @0 






11225 043540 004737 044120 ;MAP NEWBANK TO USER PAR 
11226 043544 sENTER USER MODE 

11227 043552 0, 100000 , SIZE sMOVE PROGRAM 

1 0435564 104417 sENTER KERNEL MODE 

11229 043566 042737 000001 177572 eBITO, MRO sDEENERGIZE MEMORY MANAGEMENT 
112350 043574 004737 044202 

11251 043600 013737 002506 002504 PGMCSR +2, PGMCSR sRESTORE PREVIOUS PGM. CSR 
11232 043606 052737 000001 177572 0, MARO sENERGIZE MEMORY MANAGEMENT 


022737 000001 003720 
042737 000040 172516 


;IS THIS AN 11/44 ? 
; TURN OFF UNIBUS MAP 





11236 043646 004737 043706 sSETUP LOWER 16K OF UNIBUS MAP 
11259 043652 052757 000040 172516 sENERGIZE UNIBUS MAP 
11240 043660 012700 0026350 is: sMOVE 2ND WORD OF CONFIG TO RO 
11241 04 042710 2 #BIT13,CRO sCLEAR BACKGROUND VALID BIT 
11242 043670 062 000004 #4 ,RO s INCREMENT TO NEXT BANK 
11243 043674 003620 RO, 23620 s DONE ? 
11244 043700 003771 2% 3NO - BRANCH 
11245 043702 
iiea7 043704 000207 
11248 043706 LOWMAP: SUBTST <<SETUP LOWER 16K OF UNIBUS MAP>> 
{ PSSSESSSSEEESESEEEESESEOOEOSEEEESEEESEEEDESEEESESOOEEEOESESEEEEEEEEESEEDEEODEDESS 
: *SUBTEST SETUP LOWER 16K OF UNIBUS MAP 
§ SSSSSSSSSSSSSSSSSSSSSSSESESSSESESSEEESSESESEESESSESEESESESEEEEEEESEEEEEEHEAEEEEHEOEES 
11249 043706 Ri, 
11250 043714 012700 170200 MOV @MAPLO,RO 
11251 043720 012701 170204 MOV OMAPL1 ,R1 
11252 043724 012702 000003 MOV @3,R2 
11253 043730 012011 1s: MOV CRO)+,CR1) 


NS 


CZMSODO MS11-./™ ee MACRO 1113 14 JAN-62 16:15 PAGE 350-1 SE GUENCE 
SETUP LOWER 16K OF UNIBUS MAP 

11254 043732 062721 020000 ADD OBIT13.(R1)- 

11255 0435736 012021 MOV CRO)+,.CR1)- 

11256 043740 077205 SOB R2,18 

11257 043742 POP R2,R1,RO 


11258 043750 000207 RE TURN 


be 
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SETUP LOWER 16k OF UNTBUS MAP 
11261 045752 BANKMOV:SUBTST <<MOVE BANKS>> 
§ SSSSSSSSSSSSSSSSSSSSSSSSSSSESSSESEESEEEEEEEESEEEEESEEEEEEEEEEEEEEEEEEHEEEEOEOREOEES 
; SUBTEST MOVE BANKS 
§ SSSSSSSSSSSSSSSSSSESSSSSSSESSSSEEESESESESEEEEEEEEEEESEEEEEEEEEEEEEEEEEEEEOEOEOEEES 
11262 sMOVE 3/4 OF A BANK 
11265 sCALLING SE 
11264 sRO = DESTINATION BANK 
11265 sR1 = SOURCE 
i 045752 104415 SAVREG 
11 07 0635754 0046737 044120 CALL USERMAP 
11206 043760 1046416 RE SREG 
11269 33762 104415 SAVREG 
-.270 43764 072027 000011 ASH #9. .RO 
11271 063770 O72127 000011 ASH 09. Ri 
i1272 0635774 O12702 177650 MOV @UIPARS , Ke 
gy hs 044000 012703 000200 MOV @200 ,RS 
11275 064004 010122 MOV R1,CR2)-> sMAP iST HALF BANK 
11276 044006 060501 ADO R3,R1 sBUMP BY 4K 
11277 044010 010122 MOV R1,(R2)- 
rds 044012 060501 ADD oR1 
11260 044014 010022 MOV RO,CR2)- 
11261 044016 300 ADO »RO 
11262 044020 010022 MOV RO,(R2)- 
tt 044022 060300 ADO »RO 
11265 044024 USER 
11266 044032 BMOV 100000 , 140000, SIZE/2 sMOV 1ST HALF BANK 
tr 044044 104417 KERNEL sENTER KERNEL MODE 
tr: +4 044046 012702 177650 MOV @UIPAR4 ,R2 
11291 044052 010122 MOV Ri, (R2)> sMAP 2ND HALF BANK 
11292 044054 301 ADO RS,R1 ;BUMP BY 4K 
11293 044056 010122 mC R1,CR2)+ 
te 044060 0603501 ADO R35,R1 
11296 044062 010022 MOV RO, (R2)> 
11297 044064 300 ADO RS,RO 
11296 044066 010022 MOV RO, (R2)> 
11299 044070 060 ADO RS ,RO 
11300 
11501 044072 USER 
11302 044100 BMOV 100000 , 140000, SIZE 74 sMOv SND FOURTH OF BANK 
es 044112 104417 KERNEL sENTER KERNEL MODE 
11505 044114 104416 RE SREG 
11306 044116 000207 RE TURN 


Cé 
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MOVE BANKS 
11309 044120 USERMAP: SUBTST <<SUBR MAP USER TO NEW BANK>> 
F FS SSSSSSSSSSSSSSSSSSSSSESSSSSESSESSESESSSESSSSSSSHESESSEESESEEEEESEHEEEEEEEOEEEEEEESSE 
;@SUBTEST SUBR MAP USER TO NEW BANK 
FS SSSSSSSSSSSSSSOSSSSSSSSSESSSSSSESSSSESSESSESESSESSESEESHESESESEESESESEESEOEEEEOOEESES 
11310 044120 012701 177640 MOV @UIPARO,R1 ;COPY KERNE: PAR'S £ PDOR'S (0 3) 
113511 044124 012702 172340 “OV OK IPARO ,.R2 
11312 044130 012703 177600 MOV @UIPDRO R53 
115135 0441354 012704 172300 MOV @KTPDRO ,R4 
11514 044140 012705 000004 MOV 04 RS 
11315 044144 012221 1$: MOV (R2)+,CR1)- 
11516 044146 011425 MOV C(R4),CR3)- 
tte 044150 077505 $08 R5.18 
11319 044152 013700 002272 MOV NEWBANK , RO 
11520 044156 072027 000011 ASH #9. ,RO sBANK 1 STARTS AT 100,000 LESS € LSB’S 
11321 sFOR MEMORY MANAGEMENT + 1000 
11322 044162 012705 000004 MOV 04 RS 
11523 044166 010021 2s: MOV RO,CR1)> sSETUP UIPAR(4 -7) 
11324 044170 062700 000200 ADO #200 ,RO sBUMP ADDRESS 4 
113525 044174 011425 (R4),CR3)> sSETUP UIPDR( 4-7) 
11326 044176 S08 RS.28 
tH 044200 000207 RE TURN 
11329 044202 NEWKERNEL : SUBTST <<SUBR SETUP KERNEL PAR‘S FOR NEW BANK>> 
§ SCHSSEOSSSEEESESESESESEESSOHESSESHEEESEESESOEOEEEEOEEEEEEESESEEESEEEEOEEEEOEEEOEES 
; *SUBTEST SUBR SETUP KERNEL PAR'S FOR NEW BANK 
j SPSSOSSSSSESSSSSEHSEESEESOEESO EEO OSES SEEEEESEEEESEESEEEEOEEOOSEEEEEEEEEEEEESEEEES 
11330 044202 RO.R1,RS 
11331 044210 012700 172340 MOV @KIPARO ,RO 
11332 044214 013701 002272 MOV NEWBANK ,R1 
113335 044220 072127 000011 ASH #9. Ri sBANK 1 STARTS AT os 000 LESS 6 LSB’S 
113534 3FOR MEMORY MANAGE MEN 1000 
11535 044224 012705 000004 MOV 04 .RS 
11336 044230 010120 is: MOV R1,CRO)> sSETUP KIPAR(O-3) 
11357 044232 062701 000200 ADO #200 ,R1 
11338 044236 07 S08 RS.18 
11339 044240 RS .R1.RO 
tt Tt 044246 000207 RE TURN 
11342 044250 NEWLOAD:SUBTST <<SUBR SETUP KERNEL PAR'S FOR NEW LOADER BANK>> 


§ SSSSSSSSSSSSSSSSHSSSESSESSSSSSOESESESEESESESESOSEESESESEEOEEEEEESEEEEEEEEEEEEEEEEEEEEE 


; SUBTEST SUBR SETUP KERNEL PAR'S FOR NEW LOADER BANK 


J FS SSSSHSSHSHESSHHSSHSSSEESSESHSSSSSSESESEESESSSESESSSSESESEEESSEESEEEESEESEEOHEEEEEEEOEEO 


11343 sRO CONTAINS THE DESTINATION BANK 

11344 044250 PUSH  RO,R 

11345 044254 012701 172350 MOV eKIPARS. Al 

11346 044260 072027 000011 AS? #9. RO :;BANK 1 STARTS AT 100000 LESS 6 .SB’'S (1000) 
11347 044264 010021 MOV RO,(R1)> ;SETUP KIPARA 

11348 044266 062700 000200 ADD @200 ,RO 

11349 044272 010021 MOV RO,(R1)« ;SETUP KIPARS 

11350 044274 R1.RO 

11351 044300 9000207 RE TURN 


ve 


rs 
; 
iJ? 
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BR SETUP MERNE: PAR S FOR NEW i BANK 
113554 044502 EXBANK: SUBTST <<SUBR EXAMINE BANK>> 
£ SSSSSSSSSSSSSSSSSSSSSSSSESSSESSSSESESSESSSESESEEESESEEEESEEEEEEESHEEEHECEHEE EERE EO EES 
3 ¢SUBTEST EAAMINE 
F SSSSSSSSSSSSSESSSSSSESSEESESSDESSESSSESESSESEESEEESEESEEEESESEEEEEEEEEEEE EEE EEEEEEEEE 
11555 sDOES THE FOLLOWING: 
11556 3€1) SETS UP “BANKINDEX” AND R1 BASED ON VALUE OF “BANK”. 
11357 3(2) SETS THE “MKFLAG” IF THE BANK IS ECC. 
11556 3(3) SETS THE “KFLAG” IF THE BANK IS MF11S-K. 
11359 :(4) SETS THE “KPFLAG” IF THE BANK IS THE PROTECTED mee OF ECC MEMORY. 
11560 3(5) SETS THE “ACFLAG” IF THE BANK CAN BE ACCESSED BY THIS CPu. 
11561 3(6) SETS THe “PFLAG” IF THE BANK IS IN PROGRAM SPACE. 
113562 3€7) SETS THE “RRFLAG” IF RELOCATION IS REQUIRED TO TEST THIS BANK; HOWEVE 
11365 3 IT COMPLEMENTS THIS FLAG co THE RELOCATION FLAG "RLFLAG” IS Set (THIS 1s 
113564 ; NECESSARY FOR THE USE OF THE RECURSIVE “MODE” SUBROUTINES). THE “RRFLAG: 
113565 ; IS ALWAYS SET TO DISABLE TESTING IF FIELD SERVICE MODE “SELECTED BANKS” 
11566 ; ARE BEING TESTED AND THIS BANK IS “a SELECTED. 
11367 (6) SETS THE “BMFLAG” IF THE BANK IS A BAD MEMORY; HOWEVER, IT COMPLEMENTS 
11566 : THIS FLAG IF THE “WORST” FLAG IS NOT SET (THIS IS NECESSARY FOR THE USE 
11569 : OF THE RECURSIVE “MODE” SUBROUTINES). 
11370 3(9) SETS THE “EUFLAG” IF THE BANK HAS EXTENDED UNIBUS MEMORY. 
11371 3€10) SETS THE “INTFLAG” IF THE BANK IS INTERLEAVED. 
11372 3€11) SETS THE “INT64K” FLAG IF THE BANK IS INTERLEAVED ON 64K WORD BOUNDS. 
11375 3€12) SETS THE “SKIPMK” FLAG IF THIS BANK IS INTERLEAVED, AND HAS ALREADY 
11374 ; BEEN TESTED. 
11575 : 
11576 044302 RO,R1,R2 
11577 044310 CLEAR MKFLAG,KPFLAG,KFLAG,EUFLAG 
11378 044330 SET ACF LAG 
11 044336 PFLAG ,RRFLAG,BMFLAG 
113860 044352 CLEAR = INTFLAG, INT64K , SKIPMK 
11361 044366 013701 002100 MOV BANK, 
113862 044372 006301 ASL 
11383 044374 2 ASL sR1 <- Ri « 4 
11384 044376 010137 002102 MOV Ri. BANK INDE x 
115865 044402 032761 000100 002626 SIT @B1T6 , CONFIG(R1 ) sPROTECTED REGION OF ECC MEMORY? 
11386 044410 001403 BEQ is sNO - SKIP 
11387 044412 SET 
11386 044420 012700 000002 1%: MOV e61IT1,RO0 
11392 044424 IF RO SET.IN CPUBIT AND RO OFF .IN CONFIG(R1) 
11593 044440 005037 002114 CLR ACFLAG 
11594 044444 END ;OF IF RO 
11599 044444 005737 002114 TST ACF LAG sACTIVE MEMORY? 
11400 044450 001415 8EQ i2s sBRANCH IF NOT 
11401 044452 016102 0026350 MOV CONF IG+2(R1),R2 
11402 044456 000 R2 
11405 044460 042702 177770 BIC orC7,R2 s ISOLATE ot TYPE BITS 
11404 044464 020227 000002 chp R2, 02 sIS THIS AN ——. MEM TYPE? 
11405 044470 003005 BGT i2s ANCH IF 
11406 044472 SET SIF LAG BANK F LAG 
11407 044500 000137 044742 JSP ENE XBK sJUMP OVER REST OF FLAG TESTS 
11408 044504 032761 000400 002630 123: SIT e6ITS,CONFIG+2(R1) iTS THIS EUB? 
11409 044512 001003 BNE 26 ’ IF NOT 
11410 044514 SET EUFLAG sYES - SET EUB FLAG 
11411 044 0352761 001000 002630 23: BIT eB 11S, CONFIG-2(R1) iTS THERE ECC THERE? 
11412 044530 001012 BNE 3% - SKIP 
11413 0445352 SET MKFLAG sYES - SET MKFLAG 
11414 044540 032761 000400 002650 BIT O68 118, CONF IG+2(R1 ) s1S THIS MF11S-K MEMORY 


S11 6. /™ DIAGNOSTIC 
EXAMINE BAN 


+ ¢ 


‘ 
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BEG 3% 
SET KFLAG 
002626 3% BIT @SIT7,. CON IG(R1) 
BEG Ss 
SET PFLAG. RRFLAG 
S$: TST RLFLAG 
BEG 6$ 
COM 
002626 68: BIT @BITO.CONFIG(R1) 
BEQ 8s 
SET SF LAG 
8%: Ts! WORST 
BNE 43 
COM 
96: 
SET 
END ;OF IF SELONL 
002630 BIT eeITi2. CONF IG-2(R1) 
BEQ ENE XBxK 
SET INTFLAG 
002630 BIT @BIT11,.CONF IG-2(R1) 
BeEQ 10% 
SET INT64K 
002626 10%: BIT @B8ITS.CONFIG(R1) 
BEQ ENE xBK 
SET SK IPM 
ENEXBK: POP R2,R1,RO 
RE TURN 


2°) SG. 
3NO It'S mSili-™ 
:TES - SET KFLAG 
;BANK = PROGRAM SPACE? 
sNO - SKIP 
:I1S PROGRAM RELOCATED? 
 . Sx IP 
’ 


COMPLEMENT RELOCATION REQUIRED ©L AG 

sERRORS PRESENT IN THIS BAN? 

3 Sx IP 

:IS THIS A WORST FIRS’ PASS? 
3 VE Sx IP 


OMPLEMENT BAD MEMORY FLAG 


BF LAG :NO -¢ 
If SELONLY RRPLAG AND @BIT14 OFF . IN “CONF IG-2(R1) 


:IS THIS BANK INTERLEAVED? 
sBRANCH IF IT IS NOT 


:IS THIS BANK INTERLEAVED WITH 64" BOARDS? 
;BRANCH IF IT IS NOT 


;SHOULD THIS BANK BE TESTED? 
sBRANCH IF IT SHOULD 


sRESTORE REGISTERS 


MS1i ./™ DIAGNOSTIC 
BAN 


EXAMINE 


044 752 


005237 
022737 
000207 


012757 
000207 


005237 
025737 
000207 


002152 
002116 


002110 
000030 


002100 
0025350 002100 
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002110 


002110 


ré 
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BANKOK: SUBTST <<SUBR BANK OK?>> 
FF SSSSSSSSSSSSSSSSSSSSSSSSSSSESSESSESESSSESESSSSSSESESSESESSSEEESESEEESEEEEEOEEEEEOEEES 
3; ¢SUBTEST 
FF SSSSSSSSSSSSSESSOSSESSSSSSSSSESSEESSESESESSSESSSEESESESEOESEEEEESEEESESEESEEESEEESEEEES 
sTEST TO INSURE THAT THE TYPE OF MEMORY IN THE PRESENT BANY 
3IS OF THE TYPE WE ARE TESTING “TMFLAG”’. 
sRESULT IS RETURNED IN THE CONDITION CODES (Ow « (*0)). 
mov TMFLAG,RO 


COM RO 
MOV MKFLAG Ri 
XOR RO,R1 
RE TURN 30K = (OK) 
INCRPT : 
INCPAT: SUBTST <<SUBR INCREMENT PATTERN TESTING >> 
f POSOSOEESSSESESSEESEESSSESEEESEEEEEESESEOEEEAEEEEEEEESEEEESEEEEDESEOEEESEDEEEEEE 
3; ¢SUBTEST INCREMENT PATTERN TESTING 


Pr rrririrriririiiriiiiiiiiririiirrirriririiiirriritiriTritt 
; INCREMENT THE PATTERN € SET UP THE CONDITION CODES 
;RESULT oe BIT SET INDICATES OVERFLOW 


INC 

CMP @30 ,PATTERN ;SET UP CONDITION CODES 

RE TURN sNOT EQUAL TO ZERO IS GOOD (NO OVERFLOW) 
SETPAT: 
MIPAT: SUBTST <<SUBR SET HIGHEST PATTERN TESTING TYPE>> 


§ SSSSSSSSSSSSSSSESSESSSESESSSESEESESSSESOEEEESSESESSEESSESSESEEEESESEEEOEEEEEEEEEEEEEE 


s¢SUBTEST SET MIGHEST PATTERN TESTING TYPE 


MOV 027 , PATTERN ;SET HIGHEST PATTERN 
RE TURN 
INCBNK: SUBTST <<SUBR T BANK € TEST>> 


§ SSSSSSSSSSSSSSSSSSSESSSESEESSSESSESSSEESSESEESESESESESEESEEASESESEEEESEEEEEEEEEES 


3; *SUBTEST T BANK € TEST 


§ SFSSSSSSSSSSSSSSSSSSSSSSESSEESSSESESSEESSESESSEESEEEESEEESESSEESESEEEEEEEEEEEEEEEEE 


o's RETURNED IN CONDITION CODES 
eh id LAS TBANK , BANK ;TOO FAR? 
RE TURN 


MS11-./™ DIAGNOSTIC 
INCREMENT BANK € TEST 


045030 


024720 


172516 
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BOOT: 


§ SOS SSSSSSSSSSSSSSSSSSSSSSESSSESESSESEEESESESSESEEEEEEEESESESEEEEEEEEEEEEEEHEEEOEEHREREE 


;*SUBTEST 


SUBTST <<BOOTSTRAP ROUTINE>> 


BOOTSTRAP ROUTINE 


FS SSSSSSSSSSSSESESSSSESSESSSSESSEESESEEESESESESEEEEESEEESEHEESEEEEEHEEEEEEEEE EEE ES 


1$: 


2s: 


sINITIALIZE ALL C 
sUNRELOCATE IF 
;FLUSH OUT ANY DBE 


; TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
SE eB00Ti ; TRAPS TO 4 GOTO BO0DT1 

IF RLFLAG IS TRUE THEN sCALL UNRELOCATE 

CALL MTOOSO sFLUSH OUT DBE’S 


DEENERGIZE ; TURN OFF MEMORY MANAGEMEN 

on a :IS THIS AN 11/44 On 11/24? 
oe @BITS, RS ;TURN OFF THE UNIBUS MAP 
RESET 

MOV #177406 ,RO 

MOV R1,4(RO) 

MOV 0177400, CRO) 

MOV ,-CRO) 

TSTB ¢ 

BPL 

ADD eBIT135,Ri 

TST CRO) 

BMI is 


He, 


CZMSDD0 MS1i i. /™ DIAGNOSTIC MACRO M1113 14 JAN-82 16:15 PAGE 362 EQuE? 
BOOTSTRAP ROUTINE 
11504 045156 EXIT: SUBTST <<HALT PROGRAM>> 
§ SSSSSSSSSSSSSESESESEESSEESSESSESSESEEOSESEEESESEEESEEEEEEEEEEEEEEEEEEEEEEEEHEEEEEHEEES 
;*SUBTEST HALT PROGRAM 
§ SSSSSSSSSSSSESSESSSSSESSESEESESSEEESSESEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE HOE OR EEE 
11505 045136 004737 045170 CALL SHUTUP 
11506 045142 ExIT2: IF APTFLAG IS TRUE OR ACTFLAG IS TRUE 
11507 045156 000777 BR , 
115086 045160 ELSE 
11509 045162 000000 SEXHALT: HALT 
11510 045164 000137 003632 JSP START 
tort 045170 END ;OF IF APTFLAG 
11512 
11513 045170 SHUTUP: SUBTST <<SHUTDOWN DIAGNOSTIC>> 
§ SSSSSSSSSSSSSSSSSSHASEESSSSSESSEESESESEDESESESEES SOSSEEEEESEHEHSEEHEEESEHESEEREREEE 
s *SUBTEST SHUTDOWN DIAGNOSTIC 
§ SSSSSSSSSSSSESSSESSSESESESSEESESEEESEEEEEEEEEEEEEESE  EHEEEEEEEEEESEEESEEEEHE HEHE SEEE 
11514 sINITIALIZE ALL CSR’S 
11515 3s UNRELOCATE 
11516 sFLUSH OUT DBE'S 
11517 sRESTORE LOADERS 
11516 ;TURN OFF MEMORY — 
11519 sUNMAP THE a a 
11525 045170 104472 ECCINIT AP ON DOUBLE BIT ERRORS (NORMAL ) 
11524 045172 IF RLFLAG IS TRUE. THEN SCALL UNRELOCATE 
11525 045204 IF QUICK IS FALSE 
11526 045212 004737 024720 CALL MTOO3O sFLUSH OUT OBE'S 
11527 045216 END ;O0F IF QUICK 
11526 045216 012700 000001 MOV #1.RO sDESTINATION BANK 
11529 045222 013701 002540 MOV LOADHOME ,R1 sSOURCE BANK 
11530 045226 004737 043752 CALL BANKMOV 
11531 045232 104421 DEENERGIZE s;TURN OFF MEMORY MANAGEMENT 
11532 045234 005737 002426 TST NO22SBIT :DOES THIS POP-11 HAVE 22-BIT ADOR? 
115535 045240 001003 BNE is sBRANCH IF NOT 
11554 045242 042737 000040 172516 BIC eBITS ARS sTURN OFF UNIBUS MAP 
ett 045250 000207 18: RETURN 
11540 045252 APTDOWN:SUBTST <<APT SHUTDOWN SEQUENCE >> 
§ SSSSSSSSESSSESESESESSESEESESESSEHEESEEOESOSEESEESESEEEESEEEEEEEEEESEHEEEEEEEEOEEEEEE 
s *SUBTEST SHU 
_—— “—_— "ee eRe SOREe CTEST AREA) TO Boon 
11541 045252 MAP 00 MAP SUPERVISOR SPACE (TEST AREA) TO BANK 00 
11542 045266 TESTAREA sENTER TEST MODE 
11543 045274 012737 045252 060024 MOV @APTDOWN , FIRST +24 
11544 045302 012737 000340 060026 MOV @340 FIRST +26 
11545 045310 012737 000000 125252 MOV 00 ,.F IRST + AP TOOWN 
11546 045316 104417 KERNEL sENTER KERNEL MODE 
11547 045320 000000 APTHLT: HALT 


ite 


CZMSO00 S11 ./™ DIAGNOSTIC MACRO M1113 14 -JAN-62 16:15 PAGE 364 E Gut NCI 
APT SHUTDOWN SEQUENCE 

11550 045322 SUBTST <<BLOCK MOVE SUBROUTINE >> 
§ PS SOSSSSSSSSESSSSSSSESSSSSSESSESESESESESESEEEEESEEESEEEEEEEEEEEEEEEEEEEEEEEEEEEEES 
; ¢SUBTEST BLOCK MOVE SUBROUTINE 
§ SSS SSESOSSSSSSSSESSSSESSSSSSESESSSESSESESEESESEEEESESEEEEEEEEEEEEEEEEEEEEEEEESEEHEEES 

11551 sBLOCKS HAS 3 ARGUEMENTS 

11552 sBLOCK2 HAS 2 ARGUEMENTS 

aes sBLOCK1 HAS 1 ARGUEMENTS 

11 ; 

11555 sALL ARE CALLED BY THE BMOV MACRO 

11556 -ENABL LSB 

11557 045322 BLOCKi: PUSH RO,R1,R2 

11556 045530 012702 177640 MOV OFASTCITY Re 

11559 045334 012701 000020 MOV #16. ,R1 

+iaee 045340 000415 BR 3% 

11562 045342 BLOCK2: PUSH RO,R1,R2 

115635 045550 012701 000020 MOV #16. ,R1 

itaes 045354 000404 BR 2s 

11567 045364 012501 MOV CRS)+,R1 

11568 045366 012502 2s: MOV CRS )+,R2 

tt 44 045370 012500 3%: MOV CRS )+,RO 

11571 045372 012022 1$: MOV CRO)+,CR2)> 

11572 045374 077102 SOB R1,1$ 

11573 045376 POP R2,R1,RO 

11574 045404 000205 RTS RS 

11575 -OSABL LSB 


J6 
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MS1i-./™M DIAGNOSTIC SE GJENCE 


CZMSD00 
FIELD SERVICE 


trl .SBTTL FIELD SERVICE MODE 

11 

11579 045406 F TELOSERVICE : SUBTST <«<SUBR FIELD SERVICE COMMAND MODE>> 
5 SSSSSSSSSSSSSSSSSSESSSESSESSESSESSESSSESESESEESSESESESESEESESEEEESEEESEEESEEEEEEEEELESS 
3 *SUBTEST SUBR FIELD SERVICE COMMAND MODE 
£ SS SSSSSSSSSSSSSSSSSSSSSSSSESEESSSSEESSESESSESEESSEESEESEEEEEEEESEHESESEESEEEEEEESEEEEEEE 

11580 045406 104415 SAVREG 

ttans 045410 TYPE MSGO20 sFIELD SERVICE COMMAND MODE 

115635 045414 If RLFLAG IS TRUE OR NOFSMODE IS TRUE 

11564 045450 TYPE ™SGO46 sNOT AVAILABLE NOW - TRY LATER! 

11565 045434 104416 RESREG 

115866 045436 000207 RETURN 

11587 045440 END ;OF IF RLFLAG 

11588 045440 005737 002516 TST CACHKN 

11589 045444 001402 BEQ is 

11590 045446 PUSH CONTRL sSAVE CACHE STATUS 

11591 045452 1%: PUSH CSRNO , KAMIKAZE SLAVE CSR €& KAMIKAZE STATUS 

1592 104424 CACHOF F TURN CACHE OFF 

11593 SET KAMIKAZE 

11594 045472 FS1: TYPE MSGO026 ; COMMAND : 

11595 045476 104414 RODEC sREAD A DECIMAL NUMBER 

11 045500 POP RO sCOMMAND --> 

11597 045502 7 0900022 RO,@18. 

11596 045506 101403 BLOS i$ 

11599 045510 TYPE MSGO21 

11600 045514 000766 BR FSi 

11601 045516 1%: CASE RO 

11602 045 F SCMDO sEXIT FIELD SERVICE COMMANDS 

11603 0455 045706 FSCMD1 sREAD CSR 

11604 045532 046016 FSCMD2 sLOAD CSR 

11605 045 046164 FSCMDS sEXAMINE MEMORY 

11606 045536 F SCMD4 sMODIFY MEMORY 

11607 045540 046760 F SCMDS sSELECT BANK € PATTERN 

11606 045542 047650 F SCMD6 s TYPE CONFIGURATION MAP 

11609 045544 047656 FSCMD7 3SOB-A-LONG TEST 

11610 045546 050150 FSCMDS sERROR SUMMARY 

11611 045550 050 FSCMD9 ; REFRESH TEST 

11612 045552 FCMD10 ;SET FILL COUNT 

11613 045554 050674 FCMD11 sENTER KAMIKAZE MODE 

11614 045556 050716 FCMD1i2 sEXIT KAMIKAZE MODE 

11615 045560 050736 FCMD15 s TURN C OFF 

11616 045562 050760 FCMD14 ;TURN CACHE ON 

11621 045564 050776 FCMD15 sTEST ONLY SELECTED BANKS 

1 5566 051062 FCMD16 sRESUME TESTING ALL BANKS 

11623 045570 051124 FCMD17 sENABLE TRACE 

11624 045572 051140 FCMD16 sDISABLE TRACE 

11625 045574 END ;OF CASE 

11626 000735 FS] 


IK6 
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SUBR FIELD SERVICE COMMAND ™O00F 


SE GUENCE 


11629 


045604 


051152 
002270 


002270 


FSCMDO: SUBTST <<COMMAND 0 EXIT>> 


£ SSSSSSSSSSSSSSSSSESSESSSESESESESESESESSESESSESESOESEEESEESESESEEEEEEEEHEEEHEEEEOEEEEESEEEEE 


; *SUBTEST Cc Exit 


FF SSSSSSSSSSSESSSESSSSESSSSESESSESSESEESEESSESESESESEESSESEESEEEESESEEESEEEEEEEESEEEEEEEEESEOS 


TYPE ™SG103 ;LEAVING FIELD SERVICE MODE 
ADO 02 ,SP 
IF SKIPKAMI IS TRUE 
ADD @2.,SP ;THROW AWAY OLD KAMIKAZE FLAG 
c on SKIPKAMI 
L 


sRESTORE OLD KAMIKAZE FLAG 


POP 
TST CACHKN 
;IF CACHE IS OFF 


ADD ; THROW AWAY CACHE STATUS 
ELSE 

TST CACHKN 

BEQ RESO 

POP CONTRL ;RESTORE CACHE STATUS 
END ;OF IF CACHKN 

RESO: RESREG 

RETURN 


FSCMD1: SUBTST <<FS COMMAND 1 READ CSR>> 


j PEHOSASESESESSSEESSEESEEEEESEEOEEEEEEEEESESEEESEEEEEEEEEEEOEEEERESEEEEEEEDESEEEOE 
COMMAND 


; ¢SUBTEST READ CSR 


§ FSSSSSSSOSSSSSSESESESESESESESHESEASESEEESEHESESEHSESESESEEEEEEEEEEEEEEEEESEEHEEEEEOEEEE 


C WHICHCSR 
MOV SP .FSSTACK 
SET4 ORES1 sTRAPS TO 4 GOTO RES1 
_ 
+26 sUSE ERROR ROUTINE FOR PRINTOUT 
RES4 sRESET TRAPS TO 4 TO DEFAULT 
RE TURN 
RES1: TYPE sTHIS CSR DOES NOT EXIST 

MOV FSSTACK,SP 

$4 s;RESET TRAPS TO 4 TO DEFAULT 
RE TURN 


CZ™SOD0 MS1i i. /™ DIAGNOSTIC 
FS COMMAND 1 READ 


11666 


046016 


004737 
010637 


104426 


104026 
000207 
013706 
000207 


051152 
002270 


002270 


| 
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FSCMD2: SUBTST <<FS | COMMAND 2 LOAD CSR>> 
S SSSSSSSSSSSSSSSSSSSSESSSSSESSOSSESSESSESESEESSSESESESESESSEESEEESEEEEEEEESCEEEEEHEEEEE SEES 
; @SUBTEST FS COMMAND 2 LOAD CSR 


F SSSSSSSSSSSSSSESSESSESSEESSESSEHSSSSSESESSESEESSESESHESSESESEESEESSSESEESEEEEEESEEEEEESEEEEEEEES 


CALL WHICHCSR 


MOV SP .FSSTACK 
SET4 ORES2 ; TRAPS TO 4 GOTO RES2 
READCSR 


ERROR *26 sUSE ERROR ROUTINE FOR PRINTOUT 
RES4 sRESET TRAPS TO 4 TO DEFAULT 
TYPE MSGO25 sFIRST CSR WORD 

RDOCT ;READ AN OCTAL NUMBER 

POP CSR ;PUT IN IN LOC “CSR” 

LOADCSR 

READCSR 


ie Tames +26 ;USE FOR PRINTOUT - NOT AN ERROR 
RES2: TYPE MSGO25 ;THIS CSR DOES NOT EXIST 

MOV FSSTACK , SP 

RES4 ;RESET TRAPS TO 4 TO DEFAULT 

RETURN 


mia 
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FS COMMAND 2 LOAD CSR 
11690 046164 FSCMDS: SUBTST <<FS COMMAND 3 EXAMINE MEMORY >> 
§ FSSSSSHESSSSSSSSESSSESSSSESSSSESESESESSESESSEHOEHESSESOESESESESEEEEEEEEEESEEOEEEEEEEOEOEE 
;*SUBTEST FS COMMAND 3 EXAMINE MEMORY 
§ FSSSSSSSSSSSSESSSSSESSESSESESSESSESSESSESESSSEESSESEESEBDESSEEESESESEEESEEESEEEEEEEEEEEEEEEEEEEEES 
11691 046164 PUSH BANK , NOPAR , PARTHERE ,4 
11692 046204 012737 000002 0602074 MOV @2,NOPAR s INDICATE PARITY ACTION 
11693 046212 TYPE MSGO29 sEXAMINE MEMORY 
11694 046216 1%: TYPE MSGO31 sPHYSICAL ADORESS (0-17775776)?? 
11695 046222 104415 ROOCT sREAD OCTAL NUMBER ONTO STACK € SHIOCT 
11696 046224 013737 062376 002100 MOV sHIOCT . BANK ;PUT MSB’'S IN BANK 
11697 046232 POP RO ;PUT LSB’S IN RO 
11696 046234 000241 CLC 
11699 046256 006100 ROL RO 
11700 046240 006137 002100 ROL BANK 
11701 046244 000241 CLC 
11702 046246 006000 ROR RO 
11703 046250 023737 002100 002550 CMP BANK ,LAS TBANK ;CHECK FOR BANK TOO HIGH 
11704 046256 0033557 BGT i$ sBRANCH IF TRUE 
11705 046260 062700 060000 ADD oF IRST RO 
11706 046264 0352700 000001 BIT @BITO,RO sCHECK FOR ODD ADDRESS 
11707 046270 001552 BNE is ;BRANCH IF ODD ADORESS 
11706 046272 O20027 157776 CMP RO, @LAST s;CHECK FOR ADDRESS OVER 16K 
11709 046276 101547 BHI is sBRANCH IF OVER 16K 
11710 046300 012737 046352 002266 MOV @3% , PARTHERE ; INCASE OF ABORTS 
11711 046306 SET4 04% ;TRAPS TO 4 GOTO 4% 
11712 046314 MAP BANK sMAP SUPERVISOR SPACE (TEST AREA) TO BANK 
117135 046550 TESTAREA sENTER TEST MODE 
11714 046336 011001 MOV CRO),R1 
11715 046340 104417 KERNEL sENTER KERNEL MODE 
11716 046342 TYPOCS Ri 
tt 046350 000410 BR EXCMDS 
11719 046352 3$: TYPE MSGO32 ;PARITY ABORT 
steer 0463556 000405 BR EXCMDS 
11722 046360 062706 000004 4%: ADO 04, SP sFIX STACK 
117235 046364 TYPE MSGO33 3 TIMEOUT TRAP 
et 046370 000400 BR EXCMOS 
11726 046372 104417 EXCMDS: KERNEL sENTER KERNEL MODE 
11727 0463574 POP 4, PARTHERE , NOPAR , BANK 
11726 046414 RES4 sRESET TRAPS TO 4 TO DEFAULT 
11729 046436 000207 RE TURN 


No 


ee MS11-./™ DIAGNOSTIC MACRO 11135 14-JAN-62 16:15 PAGE 373 SEQUENCE 
COMMAND 3 EXAMINE MEMORY 


11732 046440 FSCMD4: SUBTST <<FS COMMAND 4 MODIFY MEMORY >> 
5 FSSSSSSESSSSSSSSSSSSESSESESSSSESSESEESSESESESEESESESESESESEEESEEEESEEEEEEEEEEEEEEEEEEEEE 
; ¢SUBTEST FS COMMAND 4 MODIFY MEMORY 
FF SSSSSSSSSSSSSSSESSSSSSSSESSESSSESSESSESSESESESEESEEEEESEESEEEEESEEEOSEEEEOEEEEEOHOEEEESE 
117335 046440 PUSH BANK , NOPAR , PARTHERE ,4 
11754 046460 012737 000003 002074 MOV 03 ,NOPAR sINDICATE PARITY ACTION 
11735 046466 TYPE 36 sMODIFY MEMORY 
117356 046472 1$: TYPE MSGO31 sPHYSICAL ADDRESS (0-17775776)?? 
11737 046476 104413 RDOCT sREAD OCTAL NUMBER ONTO STACK & $HIOCT 
11738 046500 013737 062376 002100 MOV sHIOCT , BANK ;PUT MSB’'S IN BANK 
11739 046506 POP RO ;PUT LSB’S IN RO 
11740 046510 000241 CLC 
11741 046512 006100 ROL RO 
11742 046514 006137 002100 ROL BANK 
11743 046520 1 CLC 
11744 046522 ROR RO 
11745 046524 IF BANK GT LASTBANK THEN GOTO 1% ;CHECK FOR BANK TOO HIGH 
11746 046534 062700 060000 ADO OF IRST, 
11747 046540 IF @BITO SET.IN RO THEN GOTO 1% sCHECK FOR ODD ADDRESS 
11748 046546 IF RO HI @LAST THEN GOTO 1% sCHECK FOR ADDRESS OVER 16K 
11749 046554 012737 046622 002266 MOV 03% , PARTHERE ; INCASE OF ABORTS 
11750 046 SET4 GAs ; TRAPS v0 4 Bay ay 
11751 046570 MAP MAP SUPERVISOR SPACE (TEST AREA) TO BANK 
i1 104511 INVALIDATE 
11753 TESTAREA sENTER TEST MODE 
11754 046614 011001 MOV CRO),R1 
11755 sGETTING HERE MEANS WE GOT LUCKY - NO TRAPS 
11756 046616 104417 KERNEL sENTER KERNEL MODE 
ete 000410 BR S$ 
11759 046622 33; TYPE MSGO32 sPARITY ABORT 
try 046626 000431 BR EXCMD4 sEXIT 
11762 046630 062706 000004 4%: 4 .,SP sFIX STACK 
11763 046634 TYPE MSGO33 ; TIMEOUT TRAP 
thr 000424 BR E sEXIT 
11766 046642 5$: TYPE MSGO37 ;0L0 DATA WAS 
11767 046646 TYPOCS Ri sPRINT IT 
11768 046654 TYPE MSGO39 s INPUT NEW DATA 
11769 046660 104413 RDOCT sREAD ON OCTAL NUMBER ONTO THE STACK 
11770 046662 POP sGET NEW NUMBER 
11771 046664 TESTAREA sENTER TEST MODE 
11772 046672 010110 MOV R1,CRO) sPUT IT IN MEMORY 
11773 046674 011001 MOV (RO), Ri ;READ IT AGAIN 
11774 046676 104417 ;ENTER KERNEL MODE 
11775 046700 TYPE MSGO38 sDATA . * 
tes 046704 TyPOCcS Ri ;PRINT 
11776 046712 104417 EXCMD4: KERNEL sENTER KERNEL MODE 
11779 046714 POP 4,PARTHERE , NOPAR , BANK 
11780 046734 $4 sRESET TRAPS TO 4 TO DEFAULT 
11781 7 000207 RE TURN 
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TITIT ITI TEEPE EE Ee 
. 


be op pe 
ererenes 
Ctickos 
Vbutr O 


~ 
e 
~~ 
o 


1817 


MSL uM ee 
COMMAND 4 


046 760 


010657 


104415 


0135701 
006301 
006 301 


104413 


104415 


104511 
004737 


013737 
3702 


MODIF ¥ 
002270 


002100 


002146 
002100 
000002 
002626 
177770 
177760 
002146 
047552 
000340 
133334 
000200 
000100 


MACRO 1115 14 JAN-82 16:15 PAGE 


ME MOR + 


002150 


000060 
000062 


177776 
133316 


2t: 


5 
3; Alter 


FSCMDS: SUBTST 


i , 


iJ 


375 


<<FS COMMAND 


£ SSSSSSSSSSSSSSSSSSSSSSSSSSSSESSSSSSSSESSSSSSESOSSSSSESEOSSSEESESEEESESEOEEEEEEEOOEES 





CerNo to chosen Bank (Tris section edded Rev 0) :0 

Mov CerNo,SevCer sSeve Old CSR Number 

Mov 9k 

Pager e2,r iGenerate index into Config table 
Mov Contig r2). r3 sRS = low word of config for this 
Aer sPosition the Cer Code to Bits O - 
Bic erci?. = :Cleer all but CSR Code 

Ael r$ 3 Ad just 

Mov r3.CerNo 

MOV eCMDSC , TKVEC 

MOV @340, TKVEC-2 

MOV Os TKB .RO >It ANY OLD INTERRUPT 

BIC @BIT7.PSw ;LOWER CPU PRIORITY TO 140 

BIS OBIT6,OSTKS ;ENABLE KEYBOARD INTERRUPTS 


S 


POP 6 hiker ’ 
IF BANK GT LASTBANK THEN GOTO 18 


OV BANK Ri 

ASL Ri 

ASL can 

IF CPUBIT OFF IN CONF IG(R1) 
TYPE ™SG041 
GOTO 18 

END ;OF IF 

TYPE MSGO042 

RDOCT 

POP 


PATTERN 
IF PATTERN GT @35 THEN GOTO 28 
IF PATTERN EQ #0 
TYPE ™SGO45 


SELECT BANK € PATTERN.» 


SEGA NCE 


; *SUBTEST FS SELECT BANK € PATTERN 
§ SPOS SOSESSSOSESOESOSESSSSESOOSOESSSOEEOOESESOESESEOEESESEESEEESEEEEEEEEEEEEEEEES 
BANK , PATTERN, TESTADD .PCBLUP® , TX VEC , TXVEC-2 
“Ov SP .FSSTACK sSAVE LAST GOOD STACK POINTER 
TYPE MSGO40 sSELECT BANK £ PATTERN TES’ 
1$: TYPE ™SGO 50 sBANK(O-177)? 


sREAD AN OCTAL NUMBER ONTO THE STACK 


PuT IT IN BANK 
sCHECK FOR BANK TOO HIGH 


;BANK NOT ACCESSABLE 


eo 35)? 


sREAD AN 
sPuUT IT IN PATTERN 
| CHECK FOR PATTERN TO HIGH 


sPATTERN © DATA IS? 


OCTAL NUMBER ONTO THE STACK 


sREAD AN OCTAL NUMBER ONTO THE STACK 


sPUT IT IN R2 


sMAP SUPERVISOR SPACE (TEST AREA) 
;SET NEW MARGINS 
;BANK REQUIRES RELOCATION 


;TO ESCAPE TYPE ANY KEY! 


TO BANK 


bars 
5 


ee 


C7 


Bees ee! Oe eaere Patten * JAN-82 16:15 PAGE 375.1 


013701 002100 CMDS : 
301 
002254 


012737 
012737 


005257 
0127357 


002 364 
002 366 


@F IRST. TESTADD 

MOV OF IRST +2, TESTADD-2 

IF @BITiI2 SET.IN CONF IG+2(R1) 
I SPLTCSR 


BANK 
#120000, TESTADD-2 
END; OF IF @BITi2 


104470 


sDOISABLE ERROR CORRECTION 


sCLEAR CSRS 


002074 sPARITY ACTION 





F SPAT: 


sTRAPS ADD 2 TO PC 


sLOOP TILL KEYBOARD INTERRUPT 


DATA PATTERN TEST 

ADORESS TEST 

COMPLEMENT ADORESS TEST 
WORST — TEST 








TE DOUBLE 
WRITE INHIBIT OURING DATIP WITH OBE 
WRITE pecmety OF BYTE WITH DBE 








WRITE RECOVERY TEST 
BRANCH 


GOBBLE TEST 


S 


026132 
026504 


013706 
042777 


117700 


0047537 


0137537 
000207 


4a Sans 
5 Lec? 8 


044302 


MACRO M 
Am € P 


002150 002146 


3 
; Restore CerNo 


MTOO34 
MTOOSS 


MOV 
sIc 
POP 
“OvB 
POP 
POP 
MAP 
CALL 


Mov 
RE TURN 


’ 
' 


4 


Aten, ** JAN-862 16:15 PAGE 87s, 2 


s 1 SEC SOFT ERROR TEST 

s<1 SEC WORST CASE NOISE PARITY TEST 

FSSTACK SP sRECOVER OLD STACY POINTER 
@BIT6.E8TKsS 

TKVEC +2, TKVEC 

S$ TKB RO sGET CHARACTER TO GET RID OF FLAG 
PCBUPP , TESTADD 

PATTERN, BANK 

BANK sREMAP OLD BANK 

— XBANK 


(Addition to Rew D) 30 
SevCsr .CsrNo 


A SNE 


FS 


CZMSODO MS11-./™ DIAGNOSTIC 
COMMAND 5S 


MACRO MLilS 14 JAN-62 16:15 PAGE 376 


SELECT BANK € PATTERN 


11915 047650 


11914 047650 004737 0536632 
oi oea 047654 000207 


FSCMD6: SUBTST 
3; @SUBTEST 


<<*S 


FS 


E> 


COMMAND 6 


COMMAND 


6 


TYPE CONFIGURATION MAP. 
TYPE CONFIGURATION MAP 


A SINCE 


CALL 
RE TURN 


PCONM IG 


11919 047656 


MS11 0/7 DIAGNOSTIC 
COMMAND 6 


012737 
012737 
017700 
042737 
052777 


002270 


025222 


002270 
132504 


Pa 


MACRO M1113 14 JAN-62 16:15 PAGE 378 
TYPE CONFIGURATION “AP 


000060 
000062 


177776 
132610 


FSCMD7: SUBTST 


<<FS COMMAND 7 


yt GU NCE 


SOB -A-LONG TEST>> 


3; *SUBTEST FS 


SOB-A-LONG TEST 


PLUSH BANK ,PATTERN, TXVEC, TKVEC+2,NOPAR 


MOV SP .FSSTACK 
TYPE ™SGOS55 
IF @SwO SET.IN 2SuR 
ECCOIS 
ELSE 
CLRCSR 
END ,OF IF 
TYPE 
@CMD7C , TXVEC 
MOV 0340, TKVEC +2 
MOV asTKs, 
BIC oBIT7,.PSw 
BIS CBIT6, SSTKS 
SET HEADER ,MuUT 
CMD7B8: FOR BANK :* @0 TO LASTBANK 
CALL EXBANK 


;SAVE LAST GOOD STACK POINTER 
;S08-A- LONG TEST 

;DISABLE ERROR CORRECTION 
;CLEAR CSRS 

;BELL = EACH PASS COMPLETE 
;T0 ESCAPE TYPE ANY KEY! 
sKILL ANY OLD INTERRUPT 


sLOWER CPU PRIORITY TO 140 
sENABLE KEYBOARD INTERRUPTS 


IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
INVAL IDATE 





CMD7C: FSSTACK , SP 
CBIT6,.OtTKS 


€ XBANK 





et TKB RO 
NOPAR , TKVEC +2, TKVEC , PATTERN, BANK 
Bane ; MAP 


;sRING BELL 


sRECOVER OLD STACK POINTER 
;sREAD CHAR TO KILL FLAG 
SUPERVISOR SPACE (TEST AREA) TO BANK 


(5 { 


MS11-./™ DIAGNOSTIC MACRO (11135 14 JAN-62 16:15 PALE 360 
COMMAND 7 SOB -A-LONG TEST 


FSCMDS: SUBTST <<FS COMMAND 6 ERROR SUMMARY >> 


FE SSSSSSSSSSSSESSSSSSSESSESSSSESESEESEEEESSEHESSESSEESESESEEEEEEESEEEESEEEEHEEEEEOEEEEE 


EF GUENCE 


050150 


3; *SUBTEST FS COMMAND 8 ERROR SUMMARY 
£F SFSSSSSSSSSSSSSESSESESSSSSSESSESSES*ESESESESESEESSSESEESEESSESESEEESEEEEEESEEESEEOEEEOEEE 
050150 RO.R2,R3, BANK 
050162 013737 063104 002406 MOV sPASS, TEMP 
050170 005337 002406 DEC TEMP 
050174 TYPDEC TEMP 
TYPE ™SG125 sPASSES COMPLETED 
TYPDEC SsERTTL 
050214 TYPE ™SGO79 sERROR(S) DETECTED 
IF SERTTL NE 60 
050226 005037 002306 CLR SUCCESS 
050232 FOR BANK := #0 TO LASTBANK 
050236 013703 002100 MOV BANK,RS 
050242 070327 000004 MUL 64,R5 
050246 IFB CONFIG+2(R3) NE 00 
050254 IF SUCCESS IS FALSE 
050262 MSGO76 ;BANK ERRORS 
050266 SET SUCCE 
050274 END ;OF IF SUCCESS 
050274 TrPocs BANK, 3 
050 116300 002630 MOVB CONF IG+2(R3),RO 
050310 042700 177400 BIC @*C377,RO 
050314 TYPDEC RO 
050 TYPE sCRLF 
050324 END ;OF IFB CONFIG(RS) 
050324 END ;0F FOR BANK 
050340 END ;OF IF sERTTL 
050340 POP BANK ,R3,R2,RO 
050352 000207 RE TURN 


MS11-./™ DIAGNOSTIC 
COMMAND 6 ERROR 


050 554 


010657 


104470 
104502 


012737 


002270 


MACRO M1115 14 JAN-62 16:15 PAGE 382 
SUMMAR 1 


000060 
000062 


177776 
132112 


132010 


—4 


SANE 


FSCMDS: SUBTST «<FS COMMAND 9 REFRESH TEST>- 


§ SS SS SSSSSSSSSSSSSSSSSESSSSSESSESSESSSESHSSESSESSSESSESHESSSSESOEOSESESEESESEESHEEOE EEE EEEES 


3; SUBTEST FS COMMAND 9 REFRESH TEST 


BANK a TKVEC, TKVEC+2,NOPAR 


MOV SP .FSST sSAVE LAST GOOD STACK POINTER 
TYPE ™SGO753 ;REFRESm TEST 
IF @SWO SET.IN 3SWR 
ee ;DISABLE ERROR CORRECTION 

CLRCSR ;CLEAR CSRS 
END ;OF IF 

;BELL = EACH PASS COMPLETE 
TYPE ™SGO046 ;T0 ESCAPE TYPE ANY KEY? 
MOV @CMD9OC , TKVEC 
MOV @340, TKVEC +2 
MOV at TKB,RO sKILL ANY OLD INTERRUPT 
BIC @BIT7.PSW sLOWER CPU PRIORITY TO 140 
BIS @6IT6,asTKS sENABLE KEYBOARD INTERRUPTS 
SET HEADER , MuT 
CMD96 : oo ig :* @0 TO LASTBANK 
IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
INVAL IDATE 
CALL MTOO22 

END ;OF IF ACFLAG 
END ;OF FOR 
TYPE sBELL sRING BELL 
GOTO CMD98 
MOV FSSTACK , SP sRECOVER OLD STACK POINTER 
BIC @BIT6 Os TKS 
MOVB Ss TKB,RO sREAD CHAR TO KILL FLAG 
POP NOPAR , TKVEC +2, TKVEC , PAT TERN, BANK 
MAP BANK sMAP SUPERVISOR SPACE (TEST AREA) TO BANK 
CALL E— XBANK 
RE TURN 


MS11 ./™ DIAGNOSTIC 
COMMAND 9 REF RES 
050646 
050650 
050654 104415 
050656 
042700 177760 
110037 002331 
050670 
050672 000207 
050674 
0506 74 
050700 
050714 000207 
050716 
050716 
050722 005037 002004 
050726 
050734 000207 
050736 
050736 
050742 104424 
050744 013737 002516 
050 005037 002516 
050756 000207 
050760 
050760 
050764 013737 002520 
050772 104423 
050774 000207 


MACRO 1115 


TEs! 


002520 


002516 


14-JAN-862 16:15 PAGE 384 QUENT 


FCMDIO: SUBIST <<fS COMMAND 10 SET Filt COUNT>>» 


; *SUBTEST FS COMMAND 10 SET FILt COUNT 


RO 
TYPE ™SGO6S sFItc COUNTCOCTAL )? 
ROOCT 
POP RO 
BIC @*C17,R0 
MOVB RO, SFILLS 
POP RO 
RE TURN 
FCMD11: SUBTST <<FS COMMAND 11 ENTER KAMIKAZE MODE >> 


§ FSSSSSSSSSSSSSSESSSSSSSESHSSESESSESEEESESSHESSESESESEEESESESESESESEHESESEESEHEHEEEEEHEEES 


; SUBTEST FS 11 ENTER KAMIKAZE MODE 


§ FSSSSSSSOSSSSSESSSSSSSESSESSESESHESSESESESEESSESESESESSEESESOSESEEEEEEESEEEEEEEEEEEOEEDE 


TYPE MSG101 sENTERING KAMIKAZE MODE 
= KAMIKAZE , SK IPKAMI 


FCMD12: SUBTST <<FS COMMAND 12 EXIT KAMIKAZE MODE >> 


§ FSSSSSSSSSSSSSSSSESSSSSESESESSESSSESESEESEEESESSSSESESSSESESESEESESSEEEESHESESEEEEEOOEEEE 


3; *SUBTEST FS COMMAND 12 EXIT KAMIKAZE MODE 


§ SF SSSSSSSSSSSSSSSSSSESESSSSSESSESSESESSESSEESESESEESSESSESESSESEESSEEHEEESEEEEEEEEESEEEEE 


TYPE MSG102 sLEAVING KAMIKAZE MODE 


CLR KAMIKAZE 
SET SKIPKAMI 
RE 
FCMD15: SUBTST <<FS COMMAND 15 TURN CACHE OFF >> 


errr rriirivisrrirriririititiirriririirirTiTitiiititTtT 
3 SUBTEST FS COMMAND 13 ACHE OFF 
j POSSOOSOSESSAOSSEESEEEEEEEESOEESEEEESEEAEESESSOEEEESEEEEEEOEEEEEEEEEEEEEEEESEEES 
TYPE MSG106 :CACHE IS OFF 
CACHOF F ;TURN CACHE OFF 


MOV CACHKN , CACHKN+2 sSAVE OLD CACHE ON STATE 
CLR CACHKN sKEEP CACHE OFF 
RE TURN 

FCMD14: SUBTST <<FS COMMAND 14 TURN CACHE ON>> 


§ SSSSSESSSSSSSSSESESESESSESSESESSESEESESESESESESOESESESESEEESEEASEEEEEEEEEHAEEESEHEEHEEEEEE 
ON 


s *SUBTEST FS COMMAND 14 
§ OOO SEOSOSEESOESOEESESSESESEEEOEEEEEOEEEEEEEEEOESEEOEEEEEEEESEEEEEEEEEEDEOEEEEES 
TYPE MSG107 sCACHE IS ON (EXCEPT DURING ACTUAL PATTERNS) 


MOV 
CACHON 
RETURN 


CACHKN +2, CACHKN sRESTORE OLD CACHE ON STATE 


;TURN CACHE ON 


. Ff 


MS1i L/™ OIAGNOSTIC MACRO M1113 14-JAN-62 16:15 PAGE 385 SEQUENCE 244 
COMMAND 14 TURN CACHE ON 
050776 FCMD15: SUBTST <«<FS COMMAND 15 TEST ONLY SELECTED BANKS>> 
F POSSSSSESSSESSSSSSESSESESSSSESESSSSSSSEHESESSSSESESSESSESESESESEESESESSEEOSESEEEESEOEEOEOEOE®E 
; SUBTEST FS COMMAND 15 TEST ONLY SELECTED BANKS 
§ FSSSSSSSSSSSSSSESSESSSSSEESSSSSESSESESSESESEEESSESEESEEEESEEEEEESEEEEOEEEEEESEEEOEEESEEEE 
050776 TYPE SG105 ;ENTER BANKS IN COCTAL - USE NUMBER OUTSIDE RANGE TO TERMINA! 
051002 004737 051072 CALL CMD16A sERASE OLD SELECTIONS 
051006 BEGIN CMD16L00P 
051006 AT 
051006 TYPE ™SGO 30 ;BANK(O-177)? 
051012 104413 RDOCT sREAD AN OCTAL NUMBER ONTO THE STACK 
051014 POP Ri ;PUT IT IN Ri 
051016 IF R1 GT @177 OR RI LT OO 
1030 LEAVE CMD16L 
051032 END ;OF IF R1 
051032 006301 ASL Ril 
051034 006301 ASL Ri sR1 <- RL ee 4 
051036 052761 040000 002650 BIS @BIT14,CONFIG+2(R1) 
051044, END ;OF REPEAT 
051046: END CMD16ELO0P 
051046 TYPE MSG110 ;ONLY SELECTED BANKS WILL BE TESTED 
051052 SET SELONLY 
051060 000207 RET 
051062 FCMDI6: SUBTST << FS COMMAND 16 RESUME TESTING ALL BANKS>> 
§ SOS OOO6066060 6666666000666 060866066060066606666066666606460666060006060666080000008068 
; ¢SUBTEST FS COMMAND 16 RESUME TESTING ALL BANKS 
f PCSSESOEEEESESESESSEOESEEEEOEESEEEEEEEEEEEESEEOEEEEEEEEEEECEEEEEEEOOEEEEEEEEEEES 
051062 TYPE MSG111 ;ALL BANKS WILL BE TESTED 
051066 005037 002000 CLR SELONLY 
sENTRY POINT FROM CMD15 
051072 013702 002530 CMDI6A: MOV LASTBANK ,R2 
051076 006 ASL 
051100 006302 ASL 
051102 FOR R1 := @0 TO R2 BY O64 
051104 042761 040000 002630 BIC @BIT14 ,CONFIG-+-2C(R1) 
051112 END ;OF FOR Ri 
051122 000207 RE TURN 


CZMSD00 MS11 ./™ DIAGNOSTIC MACRO M1113 i14-JAN-62 16:15 PAGE 587 
FS COMMAND 16 


SEQ@ANCE Oe 
RESUME TESTING ALL BANKS 

l2li2 051124 FCMD17: SUBIST <<FS COMMAND 17 ENABLE TRACE>- 

fs PSOSSSSSSESESESHOSESESESSEEESSEEESSEEEEEESEEEEEEEEEEESEOESEEEEEEEEEEEEEEEOEEESEEEESS 

; *SUBTEST FS COMMAND 17 ENABLE TRACE 

§ PSSSSSSESSSSSEESEEESEESEESESESESESOEEEEEOEEEEESESESEEEEEEEEEEEEEEEEROEEEEESEEESESS 
12113 051124 TYPE ™SG127 
12114 051130 012737 177777 006140 MOV @-1, TRACE 


12115 051136 000207 RE TURN 


' 
i ; 


Z™SO00 11 ./™ DIAGNOSTIC An M1115 14 JAN-82 16:15 PAGE 38 SE GUE NCE 
as COMMAND 1? ENAGLE ‘TR 


12118 051140 FCMD1I8: SUBTST <<FS COMMAND 18 DISABLE TRACE-> 
j POSPOSSESESESSESES ESSE ESESSEOEEESESESESESEOEEEEEEEEEEEEEEEEEEEEEEOEEOEEOEOEEESS 
; ¢SUBTEST FS COMMAND 18 DISABLE TRACE 
§ POOSSSOOSESSSEOESOSESEEEESEESESEOSOEEESESESEEEOESEEEESEEEEEEEERESEEEEEEEEEEEEES 
12119 051140 TYPE MSG128 
leleO 051144 005037 006140 CLR TRACE 


12121 051150 000207 RE TURN 


—— —_— = qe ee 


MS11 ./M DIAGNOSTIC 
COMMAND 186 


051152 


DISABLE 


002220 


MACRO 1115 


r4 , 
14 JAN-62 16:15 PAGE 591 


WHICHCSR: SUBTST <<SUBR DETERMINE CORRECT CSR>> 


§ SSSSSSSSSSSSSSSSSSSESSSSSESSESESSESSSSSESSEESESESSSEEESEEESEEEEEEEESEEEEEEEEEEEEEHEEEEE 


; *SUBTEST SUBR DETERMINE CORRECT CSR 


TOTCSRS ,RO ;GET CSR’S FLAG 
CMP *BIT15,R0 ;CSR 0? 
BNE i$ ;NO - SKIP 
& CSRNO ;YES - SET IT 
RE TURN 
1%: TYPE MSGO22 sWHICH CSRC(O-F ) 
RDLIN ;GET CHARACTER 
POP RO ;PUT IN RO 
MOV CRO), RO ;PUT CHAR IN RO 
CMP RO, @106 ;CHECK LIMIT 
BHI is ;IF BAD LOOP TILL HE TYPES IT RIGHT 
CMP @’'A,RO 
BHIS 2s 
@7,R0 
2s: SuB @60 ,RO 
ASL RO 
MOV RO ,CSRNO 
RETURN 


— ———- = a ee -——- 


AG NCE 


CZMSODO 
ERROR DATA (SUPERVISOR) SETUP STUFF 


12735 


MS11-L/™ DIAGNOSTIC 


104417 


0001357 


011437 


002144 


002144 


177773 
177600 


N / 


MACRO M1113 14-JAN-82 16:15 PAGE 406 SEQUENCE 


-SBTTL ERROR DATA (SUPERVISOR) SETUP STUFF 
SPER2S: LET ADDRESS := R1 - @2 
IF ABORTFLAG IS FALSE 
TESTAREA s;ENTER TEST MODE 
LET BAD := -2(R1) 
KERNEL ;ENTER KERNEL MODE 
END ;OF IF ABORTFLAG 
IF 177654 EQ #0 
LET GOOD := R2 


:* RS 


PERRAS: SUBTST <<DATA WAS 3 WORDS>> 


F FSSSSSSSSSSSSSSSESESSESSSSSSSSSESESSESESESEEESEEEESEEEESEEEEESEESEHESEEEEOEREOEZLESEEBEE 


; *SUBTEST DATA WAS 3 WORDS 


5 SFSSSSSSSSSSESESSESSESEESESESASESSESESEESESESEEASEEEESEESEESESEEEHEEEESEESEESEEEEHEESEREEES 


IF BADPC Ay @0 THEN SCALL BADSTACK 


PUSH 
CSR ;MAKE SURE CSR BIT HOLDER IS CLEAR 
; DISABLE ECC € WRITE CHECKBITS FROM 1 SELECTED CSR 


sREAD LOCATION TO READ CHECKBITS INTO CSR 


SR ;GET CSR CONTENTS 
CSR ,RO s SAVE 


CHK1IDIS 
TESTAREA 

TST C(R1) 
KERNEL 


MOV CSR CONTENTS IN RO 

CLRiCSR sRETURN CSR TO NORMAL MODE 

ASH @-S5,R0 sMOVE CHECK BITS TO BOTTOM OF WORD 
BIC #tC177,R0 ;CLEAR OFF EXTRANEOUS GARBAGE 

LE SS := Ri sSAVE VIRTUAL ADDRESS FOR PRINTOUT 

sFIRST TEST WORD WRITTEN SHOULD ALWAYS BE ZERO 

TESTAREA sENTER TEST MODE 

MOV CR1),.BAD sGET BAD DATA FROM MUT - FIRST WORD 
MOV (R4), BAD) sAND SEC 

KERNEL sENTES KERNEL MODE 

MOVB RO.BADS sMOVE BAD CHECKBITS FOR PRINTOUT 
CLRB BADS+1 ;CLEAR OFF THE OTHER UNUSED BITS 
CALL sMARK BANK AS BAD IN CONFIG TABLE 
ERROR «33 

POP RO sRESTORE RO 

IF @SWO SET.IN &SWR 

. = s TRAP ON SINGLE BIT ERRORS 

L 


ECCINIT ; TRAP ON UNCORRECTABLE ERRORS 
ot OF IF @Swo 


CZ™SODO0 
DATA WAS 3 
12738 051466 


12760 051632 


S 


104417 
000137 


010637 
012737 
012737 
013700 


0110357 
104417 


005037 
0135706 


000207 
000000 


MS1i i. -™ DIAGNOSTIC 
wORD 


MACRO 1115 


000004 
000114 


Be 
14 JAN-B2 16:15 PAGE 408 EGENCE 


SPERSO: LET GOOD := Ri 


sENTER TEST MODE 
sENTER KERNEL MODE 





END ;OF IF ABORTFLAG 
PERR AK 


GETDATA:SUBTST <<GET DATA FROM ABORTED AREA IF POSSIBLE>> 
§ SOSSOSSESSSESSOSHOEESSESESSEESESESEESESEEEEEEEEESESEEEESEEEEEEEEEEEEEEEEHEEEEEEEEEEES 
3; eSuBTEST GET DATA FROM ABORTED AREA IF POSSIBLE 
§ FSSSSSSSSSSSSSSSSSSSSSSSSESSSSSSSESSSSSSESSSESSESSESESEESESESEEEEEESESELESEHESEEES 
PUSH RO.4.,114 
MOV SP .GETDAI 
OV @18,4 
“OV @#1%.114 
MOV ° 
TEST 
OV (RO) .BAD 
KERNEL 
CLR ABORTFLAG 
is MOV GETDA1 ,SP ;sRESTORE KNOWN GOOD STACK POINTER 
POP 114,4,R0 
RE TURN 
GETDAL: O 


- 


'; 


MS11 ./™ OTAGNOSTIC MACRO ML113 14 JAN-82 16:15 PAGE 410 


CZMSODO 
POWER FATL AUTO RESTART 


ta ANC 


12765 -SBTTL POWER FAIL AUTO RESTAR’ 
12764 -SBITL ROUTINE POWER DOWN AND UP 
12765 §SSSSESSSSSSSSSESSSSSEESSSEEEEESSESEEESESEEEEEEEEEEEEEEEEEEEEEEESEEEEEESEEEESEEEES 
127 sPOWER DOWN ROUTINE 
12767 051634 SPWRODN : 
127 sSAVE CACHE STATUS 
12776 051634 005737 002516 TST CACHKN 
12777 051640 001405 BEG 5s 
12778 051642 PUSH CONTRL 
12779 051646 1044235 CACHON ; TURN CACHE ON 
12780 051650 912737 052606 00024 5$: MOV @SILLUP .PWRVEC ;;SET FOR FAST WP 
12761 051656 012737 000340 000026 MOV @340 ,PWRVEC-2 ;3PRIO:7 
12762 051664 PUSH RO,.R1.R2.R35,R4,RS.C 
1276 3 SAVE PAR'S € 
12764 051704 012700 177700 MOV #177700,R0 
12785 051710 012701 000021 MOV #17. ,R1 
12786 051714 18: PUSH -(RO) 
12787 051716 077102 soB R118 
12766 ;SAVE SUPERVISOR PAR'S 
12789 051720 0°5737 002430 TST NOSUPER 
12790 051724 001013 BNE PD1 
12791 051726 012700 172300 MOV #172300 ,R0 
12792 051732 012701 MOV #16. ,R1 
12793 051736 2%: PUSH -C(RO) 
051740 077102 S08 Ri.2t 
2795 051742 IF RLFLAG IS on THEN SCALL WOOPS 
12796 ;COPY KERNEL MAP TO USER € SUPERVISOR 
12797 051754 012700 172300 PD1 MOV @xIPORO, 
12796 051760 012701 177600 MOV @UIPDRO Ri 
2799 0517 012702 172200 MOV @SIPDRO, 
12800 051770 012703 MOV @32..R3 
12601 051774 011021 38: MOV CRO). CR1)- 
12802 051776 2 MOV CRO)+ , CR2)- 
12 077303 S08 


SSOTORE DB GBR MBPS 


12805 


128647 052176 
12648 052204 
128649 052206 


010600 
104417 


005737 
001006 


010600 
104417 
015701 


006301 
104426 


005737 
001002 


012700 
012701 
077102 
022737 
001004 


010657 
0127357 
000000 
000776 


0024 50 


002220 


172400 


052210 


MACRO 211% 


003720 


000024 


78: 


83: 
4%; 


98: 


14 


SD0OWN: 


‘ } -< 
iJ 


®N-62 16:15 PAGE 411 


sSAVE USER € SUPERVISOR STACK POINTERS 


USER 
v USP .RO 
“ERNEL sENTER KERNEL MODE 
PUSH RO 
Ts!t NOSUPER 
BNE 78 
SUPERVISOR sENTER SUPERVISOR MODE 
MOV SSP .RO 


sENTER KERNEL MODE 


PUSH RO 
sSAVE ECC REGISTERS 


MOV yo sGET CSR'S 


“TR, 
e 

; 

3 


et 
Ai 


eeaee 
oy 
38 

mR 

+34 

: 


:IS THIS AN 11/744? 
sBRANCH IF NOT 


eeagee 
<<. 3 
638% 
3°8 
2% 
: 
‘ 
3 
; 


ER 
. SSAVRE ; 33;SAVE SP 
33;SET UP VECTOR 
3;;4ANG UP 


83252 
7 
% 
: 
* 


tye wet 


ZMSDOO MS11-./™ DIAGNOSTIC 
POWER DOWN AND © 





013701 
042701 


006201 


104425 





002220 
177400 
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000024 


003720 


[ 


yt SANE . 


s°OWER WP ROUTINE 
SPWURUP - 


18: 


106: 


38: 





OR ee :3:SET FOR FAST DOWN 


“Ov 
sRESTORE STACK POINTE 


“0V $SAVRE, 3;GET SP 
CLR S$SAvVRE 3:;WAIT LOOP FOR THE TITr¥ 
a SSAvRE :sWAIT FOR 'HE INC 


is 3;0F A WORD 
sRESTORE POSSIBLE SOFTWARE SWITCH REGISTER 


;sRESTORE UNIBUS MAP 
Cup @1,PROTYP 
108 
MAPLO , MAPHO 
LOMMAP ;SETUP LOWER 16K OF UNIBUS MAP 
sRESTORE KERNEL PAR‘S € PDR'S 

MOV pede na dpe 


IPDRO ,R2 
#16. ,R1 
(RO). 
yp > ae (R2)- 





31S THIS AN 11/744? 






cs] 
s: 


PEEELE EY 


ZMSODO MS1i-./™ DIAGNOSTIC 
POWER DOWN AND UP 


005757 
001006 


010006 
104417 


010006 
104417 


012700 
012701 


077102 


012700 
012701 


077102 


013777 
0135737 


012737 
005737 
001402 
000002 
000000 
000776 
000000 


002450 


i 
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158: 


78: 


98: 
SILiuP: 


SSAVRE: 


sRESTORE SUPERVISOR € USER STACK POINTERS 
TST NOSUPER 





S 
BNE 13% 

POP RO 

SUPERVISOR sENTER SUPERVISOR MODE 
MOV RO, SSP 

sENTER MERNEL MODE 

POP RO 

USER 

MOV RO, USP 

KERNEL sENTER KERNEL MODE 

sREST SUPERVISOR PAR'S 

MOV #172240 ,RO 

MOV #16. ,R1 

POP RO)+ 

soB8 R1,78 

sRESTORE USER PAR'S € POR7 

MOV #177636 ,RO 

MOV 

POP 

S08 

sRE TWARE DISPLAY REGISTER 

MOV AY 

MOV ISPREG 

POP CSRNO.RS .R4 RS .R2,R1,RO 

MOV @SPWURON,.PURVEC ;;SET UP THE POWER DOWN VECTOR 
TYPE ™SGOS1 sREPORT THE POWER FAILURE 
sRESTORE CACHE STATUS 

TST CACHKN 

BEG 96 

aT CONTRL 

MALT 3; THE POWER UP SEQUENCE WAS STARTED 
BR sILtup i: BEFORE THE POWER DOWN WAS COMPLETE 


9] ;;PUT THE SP HERE 
-EVEN 


ot i ACE 


CZMSD00 
ROUTINE 
12952 052614 


12976 052776 


005037 
0137537 
013757 


0127537 
012737 


MS11-./M DIAGNOSTIC 
POWER DOWN AND UP 
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053212 
053214 


060024 
060026 


QUE NCE 


WOOPS: SUBTST <<«POWER FAIL WHILE RELOCATED>> 


£ SSSSSSSHESSSSSSSSSSSSSSSSSESSSSSSSSESSSESTSESSSEEESESESESESSESESESEEEEEEESEEEE OL BEEEEE 


;*SUBTEST POWER FAIL WHILE RELOCATED 
{ POSOSSSOSSSSSSESESESEEESEEEEESEEEEEEEESEEEEEEEEEEEEEEEEEEEEEEEEEEEOEEEEEEEOOEEOS 
PUSH 
CLR BANK 
MAP sMAP SUPERVISOR SPACE (TES’ AREA) TO BANK 
SUPERVISOR sENTER SUPERVISOR MODE 
MOV FIRST +-PWRVEC , WOOPSAV 
MOV FIRST -PWRVEC-2,WOOPSAV:-2 
BMOvV FIRST +WOOPUP , WOOPSAV +4, WOOPEND -wOOPUP /2-12. 
MOV Ff IRST +PWRVE 
MOV @340 ,FIRST -PwRVEC -2 
BMOV oF IRST +WOOPUP , WOOPEND -WOOPUP /2 
MOV exIP 2RO 
MOV oF IRST+WOOPEND ,R1 
MOV 
1%: MOV 
S08 
TST 
BNE 
MOV 
2s: MOV 
MOV 
MOV 
KERNEL ;sENTER KERNEL MODE 
POP 
RETURN 





4 - 


J s< 
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POWER FAIL WHILE RELOCATED 


12979 053000 WOOPLP: SUBTST <<POMER UP FROM BANK © TO RELOCATION: - 
§ PSSSSSSSSSSSSSSSSSSSSSSSSSSESSSSESSESSSSESESSHESSEESESSEEESESEEEEEEEEEEEEEEROEEEES 
3 *SUBTCST FROM BANK O TO RELOCATION 
FG SSSSSSSSSSSSSSSHESSSSSSSSSSESSSSSESSESSEHESEESSESSESESSSESEEEESESSEESESEEEEEEESESEREEEEEEEEE 
12960 0535000 012700 055162 mov . 
12961 053004 012701 172340 “OV OK IPARO .R1 
12962 053010 012703 172300 “Ov @KIPDRO RS 
12963 053014 012702 000010 MOV 6. ,R2 
12964 012021 1s: MOV CRO)>,CA1)- 
12965 0535022 0127235 077406 MOV @77406,.(R3)- 
129866 053026 077204 S08 R2,18 
12967 053030 0057357 0024350 TST 
12966 053034 001002 BNE 38 
12969 055036 0120357 172516 MOV CRO)+ ARS 
12990 012037 177576 3%: MOV (RO)>, 
12991 053046 012037 177574 MOV CRO)+ MARI 
12992 053052 012037 177572 MOV (RO)-, 
12993 053056 015706 MOV SSAVRE , SP 
12994 053062 PUSH BANK 
12995 005037 002100 CLR BANK 
12996 0535072 MAP BANK sMAP SUPERVISOR SPACE (TEST AREA) TO BANK 
12997 055106 SUPERVISOR sENTER SUPERVISOR MODE 
12998 0535114 013737 053212 060024 MOV WOOPSAV ,.FIRST -PWRVEC 
12999 053122 015737 053214 060026 MOV WOOPSAV +2. FIRST -PWRVEC+2 
13000 :SIMULATE THE FOLLOWING BLOCK MOV BUT WITH NO ery ACCESSES 
13001 sBMOV WOOPSAV+4,F IRST +WOOPUP , WOOPEND -WOOPLP/2-1 
13002 053130 012700 053216 MOV v+4,RO 
13003 053134 012701 000105 MOV -WOOPUP /2+12.,R1 
15004 053140 012702 133000 MOV IRST +WOOPUP ,R2 
13005 053144 01 2s: MOV CRO)+, CR2)> 
ssoee 053146 077102 S08 R1.28 
13008 053150 104417 KERNEL sENTER KERNEL MODE 
13009 053152 POP BANK 
13010 053156 000137 052210 JP sPWRUP 
13011 053162 000014 WOOPEND: .REPT 12. 
15014 053212 000107 WOOPSAV: .REPT WOOPEND-WOOPUP/2+12.+2 
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IO SUBROUTINES 


MACRO M1113 AE QJENCE 








- 
13019 367% I10 SUBROUTINES 
13020 
peed .SBTTL ROUTINE TYPE 
i Pe 
13023 5 PPOOSOSSSESSOSSEEESESESESESESESESEEEEESESESESOSSEEEEESESESEEEEEEEEEESESEOEEEEEES 
13024 s*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
13025 eo THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED 
13026 : *NOTE1: SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER, 
13027 ; °NOTE2: SF IiLi.S CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED 
13026 3; NOTES: SF ILLC CONTAINS THE CHARACTER 10 FILL AFTER. 
1 3;¢ 
13030 ;*CALL: 
15031 341) USING A TRAP INSTRUCTION 
135032 ;¢ TYPE ME SADR ;;MESADR IS FIRST ADORESS OF AN ASCIZ STRING 
13033 ;*OR 
13034 3° TYPE 
13035 ;¢ ME SADR 
13037 - 
13036 053430 105737 002332 sTYPE: IST6 STPFLG 33I1S THERE A TERMINAL ? 
130359 053434 100407 BMI 6 ;8R IF NO 
13040 053436 010040 1%: MOV RO, -( SP) ::SAVE RO 
13041 053440 017600 000002 MOV 82(SP),RO 3:GET ADORESS OF ASCIZ STRING 
13042 055444 43 “OvB CRO)+, -C SP) ;;PUSH CHARACTER TO BE TYPED ONTO STACK 
13043 053446 001005 BNE 78% ;18R IF IT ISN’ T THE TERMINATOR 
13044 053450 005726 TST (SP )-+ :3:IF TERMINATOR POP IT OFF THE STACK 
13045 053452 0 St: (SP) 3 3RES RO 
13046 053454 062716 000002 6%: 2.¢ oy RETURN PC 

is 
053462 122716 000011 78: ;BRANCH IF NOT <HT> 

13049 053466 001 
13050 053470 112716 000040 sREPLACE TAB WITH SPACE 
13051 053474 122716 000200 118: ;:BRANCH IF NOT <CRLF> 
13052 053500 001 
1305 005726 33POP <CR><LF> aod 
pte ;:TYPE A CR AND L 
13056 053510 105037 053742 ;;CLEAR CHARACTER COUNT 
13057 053514 000753 3;GET NEXT CHARACTER 
13058 053516 004737 053556 63: sTYPEC ;:GO TYPE THIS CHARACTER 
13059 123726 002614 9% SFILLC.CSP)- 33I1S IT TIME FOR 4 CHARS. ? 
13060 1 at 33IF NO GO GET NEXT CHAR. 
13061 053530 013746 002330 SMALL, - CSP) 3:GET @ OF FILLER CHARS. NEEDED 
13062 s3 NULL CHAR. 
13065 053534 105366 000001 108%: DECS 1¢ SP) ;;D0ES A NUAAL NEED TO BE TYPED? 
13064 053540 002770 BLT 9% 3:8R IF NO--GO _ THE NULL OFF OF STACK 
13065 053542 004737 053556 CALL sTYPEC 33G0 TYPE A NUL 
13066 053546 105337 053742 DECB S$CHARCNT 3300 NOT COUNT As A COUNT 
13067 . 900770 BR 106 3; sL OOP 
13068 053554 XOCHAR: .WORD O 
13069 053556 STYPEC: PUSH i 
13070 053560 116601 000004 MOVB 4(SP),R1 
13071 3564 005737 002516 TST 
13072 053570 001402 BEG 4 
13073 053572 PUSH CONTRL 
13074 053576 2s: PUSH RO 
1307 104424 CACHOF F ;TURN CACHE OFF 


CZMSOD0O MS11-./M DIAGNOSTIC 
TYPE 


000760 


127002 


053554 
126764 


126760 
177600 
053554 
126732 


126726 
177600 


126700 
000015 


053742 
000012 


002516 


JO 
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3s: TSTB a@sTPS s:WAILT UNTIL PRINTER IS READ: 
t: 3% 
7S78 asTKs 3; ;CHECK F XOF F 
BPL NC ;:;SKIP IF NO CHARACTER 
053554 “OvB @$ TKB , XOCHAR ;:;SAVE THE CHARACTER 
053554 BIC @#*C177.,XOCHAR 33STRIP OFF ASCI 
000025 CMP x ° 3 ;3;WAS IT A CONTROL S$? 
BNE ;;BRANCH IF NOT 
CONTSS: TSTB asTKs s;;WAIT FOR CHARACTER 
BPL CONTS3 
053554 MOVB @$ TKB , XOCHAR ;;GET CHARACTER 
053554 BIC erci77, XOCHAR ::;STRIP OFF ASCII 
IF XOCHAR EQ @21 33 IF IT IS A *Q 
BR NC 
ELSE 
BR CONTSS 
END ;OF IF xX 
NC: MOVE R1,8tTPB 3;LO0AD CHAR TO BE TYPED INTO — REG. 
000002 CMPB @CR .2¢SP ) 331IS ees A CARRIAGE RETURN 
BNE is ; ;BRANCH I 
CLRB SCHARCNT 1 TES. CLEAR C CHARACTER COUNT 
BR sTYPEX 3 sEXIT 
000002 1%: CMPB @LF .2¢SP) iTS oy je A LINE FEED? 
BEG sTYPEX YES 
INCB (PC )-« ; | COUNT re CHARACTER 
SCHARCNT: .WORD oO : ;CHARACTER COUNT STORAGE 
sTYPEX: POP RO 
TST CACHKN :IS og A CACHE? 
BEG ed s;BRANCH IF NOT 
POP CONTRL :PO0P CACHE STATUS 
2s: POP ret 
RE TURN 
SUPLIMIT: ; 2228228288888! THIS IS THE LIMIT ON SUPERVISOR MAPPED TO MUT SPACE 


- 
t< -- 
. 
N 
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-SBTTL ERROR DATA SETUP 
USE THIS If THIS CONDITION DISCRIBES THE ERROR 


PERRO1 TRAP 
BAD DATA IN RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY -(R4) 
GOOD DATA IN R5 


PERRO? TRAP 
BAD DATA IN R1 UNLESS ABORTED 
THEN BAD DATA IS POINTED TO Br -(R4) 
GOOD DATA IN R2 


BAD. DATA IS — TO BY -C(R1) 
GOOD DATA IN 


PERRO4 TRAP 
BAD DATA IN R4& UNLESS ABORTED 

THEN BAD DATA IS POINTED T0 BY -2(RO) 
GOOD DATA IN R2 


PERROS JSR PC 
BAD DATA IS POINTED TO BY -C(RO) 
GOOD DATA IN 
RETURN AFTER SETTING UP GO00,.BAD, ADDRESS 


PERROG JSR PC 
BAD DATA IS POINTED TO BY -(RO) 

GOOD DATA IS ZERO 

RETURN AFTER SETTING UP GOOD,BAD, ADDRESS 


BAD. DATA IN R2 UNLESS ABORTED 
THEN BAD DATA IS POINTED TO By (R1) 
GOOD DATA IN DATBUF 


PERR10 TRAP 
BAD DATA IN R2 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY 2(Ri) 
GOOD DATA IN DATBUF +2 


PERR1i1 TRAP 

BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA 1s. POINTED TO BY (R1) 

GOOD DATA IS A ZERO BYTE 


PERRi2 TRAP 

BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY (R1) 

GOOD DATA IS A BYTE OF ONES 


PERRIS 


- -— oe 6 oe os ot GS Ge G+ Ge St Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge G+ Ge GH Ge Ge G+ GF Ge Ge Ge Ge Ge Ge Se Ge Ge Ge GF Ge 


TRAP 
BAD DATA IN RO UNLESS ABORTED 


i 


O@enayYVaeutrw CO 


seeeseits 


- = bb be be bP be be be be be ee 


w 


eee88 


Pt oe rt se ee pe 
todd $445 
y $F RD. } ~ 


/M DIAGNOSTIC 
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o ee 66 6+ ©: G+ Ge Ge Ge Gs Gs Ge Ge Ge GS Ge Ge Ge 6+ Ge Ge Ge GS Ge Ge Ge Ge G+ Ge Ge Ge Ge Ge Ge Gs Ge Ge Ge Ge Ss Ge G6 G+ Ge Ge Ge Ge Ge Ge Se Ge Ge G+ Ge Ge Ge Ge 
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PERRI4 


PERRIS 


PERR16 


PERR17 


PERR2O 


PERR21 


PERR22 


PERR25 


PERR24 


PERR25S 


THEN BAD DATA 
GOOD DATA IS ZERO 


BAD. DATA IN RO UNLESS 
THEN BAD DATA 
GOOD DATA IS ONES 


TRAP 

BAD DATA IN RO UNLESS 
THEN BAD DATA 

GOOD DATA IN TSTDAT 


TRAP 

BAD DATA IN RO UNLESS 
THEN BAD DATA 

GOOD DATA IN TSTDAT+2 


TRAP 

BAD DATA IN RO UNLESS 
THEN BAD DATA 

GOOD DATA IN R2 


TRAP 

BAD DATA IN RO UNLESS 
_THEN BAD DATA 

GOOD DATA IN R35 


TRAP 
7 BIT BYTE TEST 


IS POINTED T0 Br (Ri) 


ABORTED 
IS POINTED TO Br (R1) 


ABORTED 
IS POINTED TO Br (R1) 


ABORTED 
IS POINTED TO Br (R1) 


ABORTED 
IS POINTED TO BY (R1) 


ABORTED 
IS POINTED TO BY (R1) 


BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTEC 
THEN BAD DATA IS POINTED TO BY (R1) 
GOOD DATA IS A 7 BIT BYTE ON ONES 


TRAP 
BAD DATA IN R2 UNLESS ABORTED 
THEN BAD DATA IS POINTED TO By (R1) 


GOOD DATA IN RO 


BAD. DATA me RO UNLESS 


ABORTED 
N BAD DATA IS POINTED TO BY (R1) 


GOOD DATA IN R4 


TRAP 
BAD DATA mF RO UNLESS 


ABORTED 
N BAD DATA IS POINTED TO By (R2) 


GOOD DATA IN RS 


TRAP 

BAD DATA POINTED TO BY -C(R1) 

GOOD DATA IN R2 UNLESS LOC V177654 IS SET 
THEN GOOD DATA IS IN R3 


»E QUENCE 


BAD. DATA mat DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO 


GOOD DAT 


S 000000, , 100000, , 100 


MACRO 1115 


MS 


4 
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PERR27 TRAP 
BAD DATA IS DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO 
GOOD DATA IS 000000, ,000000, .077 
PERRSO TRAP 
BAD DATA IS POINTED T0 BY -16(SP) 
GOOD DATA IS IN Ri 
PERRS1 TRAP 
SPECIAL ECC FAILURE HANDLER 
PERRS2 TRAP 
SPECIAL ECC FAILURE HANDLER 
PERRSS TRAP 
SPECIAL ECC FAILURE HANDLER 
PERR34 TRAP 
SPECIAL ECC FAILURE HANDLER 
PERRSS TRAP 
SPECIAL BRANCH GOBBLE FAILURE HANDLER 
CALLING SEQUENCE FOR TRAP TYPES 
BEQ 2% i‘ ERROR ,BRANCH FOR CARD 
PERRXX TRAP TO ERROR ROUTINE 


INSTRUCTION ; CONT INUE TESTING 


CZMSOD0O MS11-./M DIAGNOSTIC 
ERROR DATA SETUP 


13958 053764 
13959 053770 
13960 053776 

054002 


010437 
162737 
010037 
010537 
000137 


010437 
162737 
010137 
010257 
000137 


010157 





13996 

13997 054174 

13998 054 

13999 054212 

14000 054220 000137 054520 
14001 

14002 054 

14003 054230 

14004 054234 

14005 054 000137 054572 
14006 

14007 

14008 054250 

14009 054254 

14010 054262 000137 054572 


MACRO M1113 14- 


sPERO1: 


SPERO2: 
002032 


SPEROS: 


$PERLO: 


sPERL1: 


$PERIL2: 


N& 
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MOV R4 , ADDRESS 
SUB @2., ADDRESS 
MOV RO, 
MOV 5 
JMP PERRAW 
MOV R4 , ADDRESS 
SUB @2, ADDRESS 
MOV R1,8A0 
MOV P 
JMP PERRAW 
MOV R1,ADDRESS 
SUB 62. ADDRESS 
MOV R4 ,GOOD 
MOV -2(R1).BAD 
JP PERRAW 

: MOV RO, ADORESS 
SUB #2, ADDRESS 
MOV ~BAD 
MOV R2 ,GOOO 
JMP 
MOV 
MOV -€RO),BAD 
MOV J S 
ADD @2,R0 sRESTORE RO 
CALL BADS TACK 
RE TURN 

: CLR GOOD 
BR PERAOS 
MOV R1, ADDRESS 
MOV »BAD 
MOV DOATBUF .GOOD 
JP Ale 
LET ADDRESS := RL + G2 
LET BAD := 
LET GOOD := DATBUF -2 
JP 
LET ADDRESS := Ri 
LET BAD := RO 
LET GOOD := 00 
JMP PERRAB 
LET ADDRESS := Ri 
LET BAD := 
LET GOOD := #377 
JP PERRAB 


000157 


054520 


000137 054520 


000455 


0004 35 


000477 


0004 16 


000407 


maCRO 1115 i4 


$PER15: 


SPERI4: 


sPERIS: 


sPERIE: 


SPER17: 


sPER21: 


SsPER2S: 


SPER24: 


ais | 


[ 


CO 2 


-82 16:15 PAGE 438 


ADORESS :- Ri 

BAD :- 

GOOD := TSTDA’T 
PE DR Aw 


:* RO 
GOCD :* TSTDAT+-2 
PERA AW 


“ACRO MILLS 14 JAN-862 16:15 PAGE 459 Fa! 


ERERBaT cht OAS 


14063 054520 PERRAW: SUBTST <<DATA WAS A WORD>> 
§ SFSSSSSSSSSSSSSSSSSSSESSSSSSSESSSSESSSESSSSEESSEESSESESEEEEEEEEHEEEEEEEHEE EEE EEEEEESE 
; ¢SUBTEST DATA WAS A WORD 
F FSSSSSSSSSSSSSSSSSSSSHESSSSSSESSESESSSESSEESSESESOESEEEEEEEESEEHRHEHEEEEEEEEE EE EEES 
14064 054520 904737 054754 CALL PERBNKX 
14065 054524 If ABORTFLAG IS TRUE THEN SCALL GETDATA 
14066 054536 IF BADPC EQ @O THEN SCALi BADSTACK 
14067 054550 0046737 054730 CALL PERXOR 
14066 054554 If ABORTFLAG IS FALSE 
14069 054562 104011 ERROR -11 
14070 054564 
14071 054566 104012 ERROR +12 
14072 054570 END ;OF IF ABORIFLAG 
pe th 054570 000002 RTI 
14075 054572 PERRAB: SUBTST <<DATA WAS A BYTE>> 
SE SSSSSSSSSSSSSSSSSSSESSESESSSSSSSSESESSESSSESSESSSSSSEHEESSSEESEEEEHESESESESEHESEEEEEEEOE 
; *SUBTEST DATA WAS A BYTE 
§ SSSSSESSSSSSSSSSSSSSSSSHESSSSESSHESESESSSSSSESESESESSEEESEEESCEOEESESESESEEEHOEHEESEOEEE 
14076 054572 004737 054754 CALL PERBNK 
14077 054576 If ABORTFLAG IS TRUE THEN SCALi GETDATA 
14078 054610 IF BADPC EQ 00 THEN SCALL BADSTACK 
14079 004737 054750 CALL PERXOR 
14060 IF ABORTFLAG IS FALSE 
14061 054634 104014 ERROR +14 
14062 054636 ELSE 
14065 054640 104015 ERROR +15 
140864 054642 END ;OF IF ABORTFLAG 
140865 054642 000002 RTI 


SATA uns Abr te CASTE 


140868 054644 


| . 4 
iJ 
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PERRA?T: SUBTS! <<DATA WAS A 7? BIT Brie>>» 

£ FSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSESSESSSOSSESESSSESEEEHEEEEEEEE EERE REEES 
; *SUBTEST DATA WAS A 7? BIT BrTE 

§F SFSSSSSSSSSSSSSSSSSSSSSSSSESSSSSSESSSSESSSESESESESEESESCESEEESEEEEESEREEEEEEEE REESE ES 


IF BADPC EG 00 THEN SCAil BADSTACK 
PERXOR 


CALL 

CALL PERBNK 
ERROR +22 
RTI 


SPER26: LET GOOD2 := #100000 
LET GOODS := #100 
JP PERRAS 


SPER27: CLR GOOD2 
LET GOODS := 0077 
JP PERRAS 


PERXOR: SUBTST <<DETERMINE XOR OF GOOD € BAD>> 


:¢SUBTEST DETERMINE XOR OF GOOD € BAD 


£ SSSSSSSSSSSSSSSSSSSSESHSSSESSESEEESSSSSESEESESESSEEESHESSSESHEESEHEEHEEEEESEHEREEHOESSE 


PUSH 

MOV »RO 
MOV BAD .BADXOR 
xOR RO ,BADXOR 
POP 

RE TURN 


b'4 
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CZMSD00 S11 ./-™ OIAGNOSTIC £QNCE 
DETERMINE =OR OF GOOD £ BAD 
14112 054754 PERBNXK: SUBTST<<LOG ERROR ON BAD SANX>> 
§ FSSSSSSSSSSSSSSSSSSESSSSSSSSESSSSSSSHESSSESESESESESSEOSESSESSESESSECEESEEEEEEEEEEEEEESE 
3; *SUBTEST LOG ERROR ON BAD BANK 
F SSSSSSSSSESSSSSSSSSSSESSESSSSSSSSSHSSSESSESSSESSSESSESSSESSESSESEESESESSESCSEEOEOEEEOESEESE 
141153 sWHILE WE'RE HERE LET'S MARK THE BAD BANK IN THE CONFIGURATION TABLE 
14114 054 PUSH Ri 
14115 054760 013701 002100 “OV BANK .R1 
14116 054764 006301 Ri 
14117 054766 006301 Ri 
14116 054770 052761 000001 002626 @BITO, CONF IG(R1) 
14119 054776 105261 002650 CONF IG+2(R1 ) ;BUMP BANK COUNTER 
14120 001002 i2s 3NO OVERFLOW - SKIP 
14121 055004 105361 002650 CONF IG+2(R1) sSET BACK TO 255. 
14122 055010 126137 002630 002526 i125: COM IG+-2(R1), ERRMAX 3IS IT PAST MAX? 
14125 055016 101403 118% sNO - SKIP 
14124 055020 TOOMANY ;YES 
14125 055026 118%: R1,RO0 
———— 
14126 055034 010037 002050 PERECC: MOV RO.BAD 
055040 IF ADORESS EQ TESTADD 
055050 013737 002242 002042 MOV TSTDAT.GOOD 
14131 055056 ELSE 
055060 013737 002244 002042 MOV TSTDAT +-2,GO0D 
141353 055066 END ;OF IF CR1) 
055066 004737 054730 CALL PERXOR 
141355 055072 SET ME ADTR 
PET 3 055100 000207 RE 
141386 0551 SPERS1: IF BADPC EQ @0 THEN SCALL BADSTACK 
14159 055114 004737 055034 CALL 
055 IF REALPAT EQ @11 
14141 055130 104037 ERROR +37 
14142 055132 END ;OF IF REALPAT 
14143 055132 IF AT EQ @14 
14144 055142 104042 42 
14145 055144 END ;OF IF REALPAT 
14146 055144 IF AT EG #15 
14147 055154 104043 4 
141 0551 END ;OF IF REALPAT 
14149 055156 IF REALPAT EQ 016 
14150 055166 104044 ERROR «44 
14151 055170 END ;OF IF REALPAT 
14152 055170 SET HEADER 
14153 055176 000002 RTI 


Cc 


MS1i1 ./™ DIAGNOSTIC 
BAD BANK 


ZMSD0O 
LOG ERROR ON 


14156 055200 


14166 055270 
14170 


14192 
14193 055414 
14194 055420 


141986 055442 


010057 
010137 


104023 
000002 


002032 


0547530 
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t ‘4 


SPERS2: IF BADPC EQ @O THEN SCALi BADSTACK 








OV R1. ADDRESS 

MOV BAD 

“Ov R2.G000 

SET HEADER 

ERROR 40 

SET HEADER 

RTI 
SPER3S3: IF BADPC EG #0 THEN SCALL BADSTACK 

“Ov R1. ADDRESS 

MOV RO ,.BAD 

CLRB BAD +1 

MOV @#377,GO000 

CALL PERXOR 

SET — 

SET HEADER 

RTI 
SPER3S4:IF BADPC EQ #0 THEN SCALL BADSTACK 

IF @BITIS!8IT4 OFF .IN CSR 

aa °16 sNO SBE OR DBE 

ERROR +i sEXPECTED SBE SO DBE MUST HAVE GOTTEN SET 

END ;OF IF @BITIS!BIT4 

RTI 

sOURING BRANCH GOBBLE THE CONDITION CODES WERE WRONG 
SPERSS: CALL 

CALL 

MOV 

MOV 

ERROR 

ADO o4 SP 3FIX STACK FROM TRAP 

RE TURN ;ABORTING TEST 
SPERSE: MOV RO ,GOOD 

MOV R1,BAD 

SET 

ERROR +23 

SET HEADER 

RTI 


14265 055704 


011637 
011637 


MS11-./M DIAGNOSTIC 
SCCPE HANDLER 


002372 
045136 


MACRO 1115 


056556 
056556 


003720 


124716 


s@THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT wit INCREMENT 


‘ 


ee. 
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-SBTTL ROUTINE SCOPE HANDLER 


;*AND LOAD THE DISPLAY DATA INTO THE DISPLAY REGISTER 
;@THE SWITCH OPTIONS PROVIDED SY THIS ROUTINE ARE: 


;TELL APT WE ARE ALIVE 


3IS THERE A CPU ERROR REGISTER? 


FOR CHANGE IN SOFT-SwR 


sBRANCH IF NOT 


sGET CONTENTS OF ERROR REGISTER 
:IS THE A ase MONITOR BIT SET? 


REPORT IF SO. 


ssIF RUNNING ON THE “XOR” TESTER CHANGE 
ssTHIS INSTRUCTION TO A “NOP” (NOP =240) 
ssSAVE THE ean OF THE ERROR VECTOR 


? 
ssRESTORE THE ERROR VEC 


:3GO TO THE NEXT TEST 
sFIX STACK FROM TRAP 


3; *SW14-1 LOOP ON TEST 
ty LOOP ON ERROR 
34 
3° 3:3; SCOPE -iOT 
sSCOPE: INC sDEVC 
IF RESULT IS LT 
CLR sDEVCT 
INCB ‘sUNIT 
END ;OF IF RESULT 
CKSWR 73: TEST 
TST TRACE 
BEQ NOTRCE 
CALL CONTT 3; TRACE 
NOTRCE : 
TST CPERRF 
BEG SKJ 
MOV 80177766, CPSAVE 
BIT @BITO, CPSAVE 
BEG ry a ;BRANCH I 
ERROR 
SKJ: IF STOPOK Is TRUE AND sua SET.IN &SWR 
CLR STOPOK 
PP EXIT 
END ;OF IF STOPOK 
i eg IS TRUE 
END ;OF IF NOSCOPE 
18: IF esata SET.IN @SWR THEN GOTO sSOVER 
1000005 wii FOR THE XOR TESTER@CCee 
sxTSTR: on. 
MOV ERRVEC , -( SP) 
MOV #16, 33SET 
Tst 177060 ;;TIME OUT ON 
Ov (SP), 
VLAD 
od 
#1, PROT YP 








CPUERR 
ae 


COUE FOR THE XOR TESTER@@OCe 
SERFLG 5 5HA 





SERFLG 
(SP), SLPADR 
(SP), SLPERR 


sIS THIS AN 11/44? 
sBRANCH IF NOT 





TOR 


sRESET CPU oa an REGISTER 


:sRESTORE THE 





ERROR VECTOR 


33L00P ON THE PRESENT TEST 


IF 
+ sSET LOOP ADORESS TO LAST SCOPE 


33ZERO THE ERROR FLAG 
:3SAVE SCOPE LOOP ADDRESS 
3;SAVE ERROR LOOP ADDRESS 


aE GUE NCE 


“oe of oe G+ Ge oF 
DwDDwDDDyD 
‘ ’ ‘ 

NONOOOAO 


SEOHIRE Seb cates 


14266 055710 
14267 055714 
14268 055720 
14269 055724 


005057 
004737 
0135716 
000002 


002534 
055 726 
002564 
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SOVvVER: 


ri‘ 


ciR SE SCAPE 
CALL GETOIS 

Ov SLPADR (SP) 
RTI 


3:CLEAR THE ESCAPE FROM ERROR ADDRESS 


33FUDGE RETURN ADDRESS 
ssFIXKES PS 


t ‘4 s nce 


ZMSDDO S11 ./™ DIAGNOSTIC 
SCOPE HANDLER 


14285 


055726 


1137357 
113737 


005737 
001405 
052737 


013777 
0135737 


000207 


002100 
002262 


002124 
100000 


002010 
002010 
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002011 
002010 


002010 


124614 
000174 


>, | 
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GETDIS: SUBTST <<SUBR OISPLAY>> 


3; @SUBTEST SUBR DISPLAY 
F SSSSSSSSSSSSSSSSESSSSSSSSSESSSSSSSESSSESSSSESESSSESESSSSESESSESSSESESEESESESESEHOSESEOEEE 
“Ov8 BANK, SBANK 
™OvB REALPAT, SPATMAR 
PUSH RO 
Ts? RLFLAG ;ARE WE RELOCATED? 
6EQ is ;NO - SKIP 
a BIS @BIT15. SPATMAR ;YES - SEY SB 
OV SPATMAR , SDISPLAY 
MOV SPATMAR .DISPREG ;SOF TWARE DISPLAY REGISTER 
POP RO 
RE TURN 


»E QUENCE 


MS11-./™ DIAGNOSTIC 
HANDLER 


CZMSD0O0 
ROUTINE ERROR 


005237 
012737 


011637 


013737 
162737 
013737 


056554 


002012 


055726 
002010 
002000 


002572 
077777 
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063102 
124536 


"4 


LJ 
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-SBTTL ROUTINE ERROR HANDLER 
5 PSOSOSESOSSSEOEOOSESSOEEOSEESEOE SEES SEESEEEOEEEEEEOEEESEOEEEOEEEEEEOEOEEOEESS 
:*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
;*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 


;#AND GO TO SERRTYP ON ERROR 


;*¢THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE APE: 


;@SWiS-1 HALT ON E 





; *SW135-1 INHIBIT ERROR TYPEOUTS 
:#SW10-1 BELL ON ERROR 
:*SW9-1 LOOP ON ERROR 
3; *CALL 
3;¢ ERROR N ;;ERROR=EMT AND N-ERROR ITEM NUMBER 
-ENABL LSB 
SERROR: CLRB IBSAVE ;R-C 
IF NOERROR IS FALSE 
CKSWR 33 TEST FOR CHANGE IN SOFT -SwR 
BACK: 3R-C 
18%: INCB SsERFLG 33;SET THE ERROR FLAG 
BEQ $ ; ;00N'T LET THE FLAG GO TO ZERO 
CALL GETOIS ;SETUP DISPLAY STUFF 
MOV SPATMAR.STESTN ;FOR APT 
@SW10, 8SwR ;;BELL ON ERROR? 
73N0 - IP 
;;RING BELL 
;CONTROL Z 
238: +;COUNT THE NUMBER OF ERRORS 
3:GET ADDRESS OF ERROR INSTRUCTION 
SITES 3:STRIP AND SAVE THE ERROR ITEM CODE 
#177, 8ITEMB 3IS THIS THE POWER FAIL CALL? 
10015 ;BRANCH IF SO 
VE :;2ND ERROR CALL? 
10006 sBRANCH IF SO 
:IS THERE A ov ERROR REGISTER? 
10018 sBRANCH IF 
MOV 177766 ,CPSAVE sSAVE CONTEN 
BIT @BITO,CPSAVE sPOWER MONITOR BIT SET? 
BEQ 10018 sBRANCH IF NOT 
BIC @BITO, 177766 ;CLEAR THE BIT 
MOVB @CITEMB.IBSAVE ;MAKE IBSAVE NON-ZERO FOR DUAL CALL 
MOVB #177, 8ITEmMB ;SET SITEMB TO POWER FAIL POINTER 
BR 100158 
10008: CLRB IBSA 
10015: 


SE GUENCE 


‘ ) ' ‘ ' ‘ ‘ ’ 
NOOOAHAAOMNONANNANANANAN 


oo se © @e Ge Ge Ge Ge Ge Gs G+ Ge Ge Ge Ge 
DBDBDBDBDBBDAWDIIDIADAD 


$20 


i” , 


MS11-L/M DIAGNOSTIC MACRO M1113 14 JAN-82 16:15 PAGE 450-1 JE QUENC! 
ERROR HANDLER 


056252 013737 002030 002026 MOV BADPSW.ERRPSW 
056260 005037 002020 CLR BADPC 


056264 013737 002016 063100 MOV ERRPC, SF ATAL sFOR APT 


056302 000412 BR 3% 

056304 END ;OF IF @Swi3 

056304 IF @SWS SET.IN @SWR AND TOOMANY IS TRUE 

056322 GOTO 3% 

056324 END ;OF IF e@SwS 

056524 END ;OF IF NOERROR 

056324 004737 056562 CALL sERRTYP 3;GO TO USER ERROR ROUTINE 


ZMSODO MS11-./M DIAGNOSTIC 
ERROR HANDLER 


005777 
100002 


000000 
104410 
015716 
005737 
001402 
013716 


124256 


056554 
056014 


MACRO M1112 


3$: 


SHALT: 
7%: 


9%: 
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IF NOERROR IS FALSE 
TST @SuR 


BPL 7% 


HALT 


CKSWR 
IF NOSCOPE IS FALSE AND @SW9 SET. IN 
NOSCOPE 


MOV SLPERR 


93 
SESCAPE ,( SP) 
IF DETFLAG IS FALSE 


CMP @1,PROTYP 


ONE 11% 


JP 
END ;OF IF 


;;4ALT ON ERROR 

:3SKIP IF CONTINUE 

::HALT ON ERROR! 

;;TEST FOR ag IN SOFT -SwR 


FUDGE RETURN FOR LOOP ING 
;sCHECK FOR AN ESCAPE ADDRESS 
NONE 


;;8R IF 


;;FUDGE RETURN ADDRESS FOR ESCAPE 


;IS THIS AN 11/44? 


AG 
IF XXDPCHAIN IS TRUE AND SERTTL HI 020 
YPE MSGO66 


42 


JP $ZAP42 
END ;OF IF XXDPCHAIN 


ELSE 

SET HEADER 
END ;OF IF 
CLEAR TOOMANY ,.NOERROR 
TSTB IBSA 
BEQ 215% 
Jp BACK 
RTI 
-WORD 0 
.WORD O 
-WORD 0 
.DSABL (LSB 


sERROR COUNT EXCEEDED 20 - ABORTING FOR XxDP CHAIN 


sPOWER FAIL ERROR CALL ? 
; JUMP IF SO 


; sRETURN 


CLR CPUERR 
: IF ACTFLAG IS TRUE a APTFLAG IS by OR FATAL$ IS TRUE 
MOV “ae sFOR AP 


i 
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— .SBTTL ROUTINE ERROR MESSAGE TYPEOUT 
144 
14405 5 FSSSSSSSSSSESSSSSSSSSESSSHSSSSSSSSSSSSESSSSHESSESSSEESSSSEESSEESEEEEEEEEESEEOEESESESEOS 
14406 ;@THIS ROUTINE USES THE Me CONTROL BYTE” (CSITEMB) TO DETERMINE WHICH 
14407 s*ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE “ERROR TABLE” (SERRTSB). 
eae ;*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 
14410 056562 104415 SERRT YP: SAVREG 
14411 056564 TYPE sCRLF 3; “CARRIAGE RETURN” € "LINE FEED” 
14412 056570 CLR RO ::PICKUP THE ITEM INDEX 
14415 056572 153700 002013 BIss SITEMB RO 
14414 056576 001004 BNE 33;IF ITEM NUMBER IS ZERO, vuUSsT 
1441 3:;TYPE THE PC OF THE ERROR 
14416 056600 TYPOCT ERRPC,.<ERROR ADDRESS> 
14417 056606 000511 BR 11% 33GET OuT 
14418 056610 122700 000177 1%: CMPB 0177,RO0 sPOWER MONITOR CALL? 3;R-C 
14419 056614 001005 BNE 100% ;BRANCH IF NOT ;R-C 
14420 056616 012700 057072 MOV OPFECWS .RO ;sMOV ADDRESS OF PFE BIT ERROR TO RO 3R-C 
14421 056622 BR 110$ ;R-C 
14422 056624 005300 100$: DEC RO s;ADJUST THE INDEX SO THAT IT WILL 3R-C 
14423 056626 006300 ASL RO 3 WORK FOR THE ERROR TABLE 
14424 0566350 006300 ASL RO 
14425 056632 006300 ASL RO 
14426 056634 062 063520 ADO @sERRTB,RO ;3;FORM TABLE POINTER 
14427 056640 012037 056676 1108: MOV CRO), ;sPICKUP “ERROR MESSAGE” POINTER sR-C 
14426 056644 001417 BEQ ;3:SKIP TYPEOUT IF NO POINTER 
14429 056646 005737 002402 TST :IS THIS REALLY AN ERROR? 
14430 056652 001003 BNE 126 sYES - SKIP 
14431 056654 005737 002554 TST & ; TYPE HEADER? 
056660 100011 BPL s 3sNO - SKIP 
14433 056662 005737 002062 12%: TST FATALS ; WAS IT A FATAL ERROR? 
14434 056666 001402 BEQ 2s sNO - Ip 
14435 056670 TYPE MSG067 ;F ATAL 
14436 056674 2s: TYPE 1: TYPE THE “ERROR MESSAGE” 
14437 056676 000000 38: -WORDB O 33: "ERROR MESSAGE” POINTER GOES HERE 
14438 056700 TYPE sCRLF 3: "CARRIAGE RETURN” € "LINE FEED” 
14439 056704 012037 056730 4$: MOV CRO)+.58 ssPICKUP “DATA a ell POINTER 
14440 056710 001412 BEQ 6% 33SKIP TYPEOUT IF 
14441 056712 005737 002402 TST 3IS THIS REALLY aN ERROR? 
14442 056716 001003 BNE 13% ;sYES - SKIP 
14443 056720 005737 002554 TST s TYPE HEADER? 
14444 0567 100004 BPL 6% 3NO - SKIP 
14445 056726 13%: TYPE ss TYPE THE “DATA HEADER” 
14446 056730 000000 S$: -WORDB O 33 “DATA HEADER” POINTER GOES HERE 
14447 056732 TYPE sCRLF 33 “CARRIF RETURN” € “LINE FEED” 
14448 056736 012001 68%: MOV ele Ri 3:PICKUP “DATA TABLE” POINTER 
14449 056740 001427 BEG t3 NO DATA TO BE TYPED 
14450 056742 012002 MOV tRO)>. R2 ;sPICKUP “DATA FORMAT” POINTER 


NY 
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ROUTINE ERROR MESSAGE TYPEOUT 

14453 056744 112203 78: MOVB (R2)+,R3 

14454 056746 006303 ASL RS ;MAKE IT A WORD ADDRESS 

14455 056750 004773 056756 CALL 883(R3) 

14456 056754 000412 BR 9% 

14457 056756 057202 8s: TAG70$ 

14458 056760 057212 TAG71$% 

14459 056762 057 TAG72$ 

14460 056764 057272 TAG73$ 

14461 056766 057332 TAG74$ 

14462 056770 057344 TAG7S$ 

14463 056772 057 TAG76$ 

14464 056774 057422 TAG77$ 

14465 056776 057450 TAG78$% 

14466 057000 057510 TAG79$ 

14471 057002 062701 000002 9%: ADO @2,.R1 ;UPDATE DATA TABLE POINTER 

14472 057006 005711 TST (R1) 33;1S THERE ANOTHER NUMBER? 

14473 057010 001403 BEQ 10% ;;8R IF NO 

14474 057012 TYPE MSGO18 ;TYPE 2 SPACES 

pede 057016 000752 BR 7$ ; ;LO0P 

14477 057020 005737 002106 10%: TST MUT ;IS THERE A MEMORY UNDER TEST 

14478 057024 001402 BEG 11% ;NO - SKIP 

14479 057026 005237 002554 INC HEADER ;YES - BUMP HEADER FLAG 

14480 057032 104416 11%: RESREG 

14461 057034 IF @SW7 SET.IN @SWR AND DETFLAG IS FALSE AND NOERROR IS FALSE 

057060 004737 057532 DETAIL 

14483 057064 END ;OF IF @SW7 

14484 057064 TYPE MSG104 sCONTROL Z 

14485 057070 000207 RETURN 

14486 -EVEN ;R-C 

14487 eereze yo he 057136 057166 PFECWS: .WORD PFECEM,PFECDH,PFECOT ,.PFECOF ;R-C 

14488 057102 120 117 127 PFECEM: .ASCIZ “POWER MONITOR BIT FOUND SET” 3R-C 


057124 1 117 125 
057127 116 104 
057132 105 124 
057135 000 
14489 057136 124 105 123 PFECOH: .ASCIZ “TESTNO ERR PC CPUERR” 3R-C 
057141 124 116 117 
057144 040 040 105 
057147 122 
057152 120 103 040 
057155 040 03 120 
057160 125 1 122 
057163 122 
14490 EVEN sR-C 
14491 057166 063102 002016 056556 PFECDT: .WORD sTESTN,ERRPC,CPSAVE ,O 3R-C 
057174 000000 
14492 057176 000 000 000 PFECOF: .BYTE 0,0,0,0 3R-C 
057201 000 


14493 


ZMSDOO MS1i & 
ERROR 


14515 
4516 


7244 
057250 


00020” 





™ DIAGNOSTIC 
MESSAGE | *PEQuUT 


002100 
000004 


037256 
002344 


0021006 
000004 


037576 
002 344 
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: 
sant 


§ PSSOSSSSSSSSSSESSESSSEESEESESESESEEEEESSEEEEEOEESESEEEESEEEEEEE EEE EEEEOEEEEEEEEESS 
;eee OCTA eee 

§ SPSSSSSSSSSSSSSESSSS SESESSESSSOSESSEESESEESEESESESESSEEESESEEEEEESEEESES OSES EEEESEEE® 
TAG TOS: pana. Ri) r2:7°PE aN OCTAL NUMBER 


§ FSSSSSSSSSSSSSSSSSSSSSSSSSSSSSESSSSESSSSSSSSSSSSSSSSSSSESSSESESEEEEEEEEOEEEEOREEESE 


;eee DECIMAL eee 


TAG718: TYPDEC @CR1) 1: TYPE A DECIMAL NUMBER 
PE TURN 


;eee INTERLEAVE eee 


TAG7T2¢$: PUSH R1 RS 
"Ov 


“y 

04,Ri 

SET NOTAB s INDICATE NO TABLE 10 BE PRINTED - NOw 
TYPE #™SGO14 

Cut i ICFIGI 

CLR NOT 

POP RS ,R1 

TYPE 14 :1 SPACE 

RE TURN 


§ SOSSSSSSSOSSESSESSEESEESSEHEEHESESEESOSESESESSEEESSOOEEOESEOEEEEEESESESESEEEEEES 
;ee0e CSR cee 
§ SOSSSSSSSSSOSSOSESESSOESSESEEESSEEESESESESESESEEEEEESHEEEEEOEESEEEEEESEEEEEEEEEES 


TAG7S$: PUSH 


SET 
CALL 





FS SSSSSSSSSSSSSSSSSSSSHESSSEHSESSSSESSESSSSSSSSSSSSSEHESESESESESESEEEEESESESEHESEEEEOE 
peee PATTERN ees 
§ SSSSSSSSSSSSSHSSHSSSSSSSESSHOSSHESSSSESSESSHESSSHESSSESSSESSESEESSESESEEESEHEEEESEEEEEESE 


TAG?748: TYPOCS REALPAT,<TYPE (0-77)>,2,2 
RE TURN 





§ FSSSSSSSSSSESSSSSESHSESSSESSSSESESSSESSESSESHSSSHESSHSESHESESSESESEEESSESHSESSESEEEEEOOEEE 


;eee BANK ese 


§ SSSSSSSSSSSHSSSSSSSSEESHSSSSSSSSSHSSESOSHOSSESSSSESSESSESESSEESSEESOSEEESESEEESESEOEOESE 


TAG7S$: TYPOCS BANK,<TYPE (0-167)>,3 
RE TURN 


ERAdR MESSAGE Tree Out 


057524 
057530 


013701 
070127 


004737 
005057 


013757 


002100 
000004 


037410 
002344 
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002036 


002036 


‘ 
— > 
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§ PFSSSSSSSSSSSSSSSSSSSSSSSESESSSESSSSSSESESSSESESSEESEEEEEEEEEEE SEES EEEE EEE EEE 
geee MIYPE eee 
F SFSSSSSSSSSSSSSSSSSSSSSSESSESSSSSSSESSSESSESSSSSEESSESSESEESEEEEEEEEEEE EE EEEEEE EEE ES 


TAG76$: PUSH R1.R5 
™OVv Ri 
MUL 04 .R1 
SET NOT AB 
TYPE MSGO19 
CALL TCF IG2 
CLR NOTAB 
POP RS .R1 
RE TURN 

§ SOSSSSSSSSSSSSSSSSSESESSESESSESESESESSESESEESEESSESSESEESEESESEEHEEEEEEEESEEEEEEEEEOEES 

3; eee TA eee 


j PORSOSSESSOSSESESESSESOEEEEESEEEEOEEEOSEEEEEEEEEESEEEEEEESEEEEEEESEEEEEEHEEEEES 
TAG77$: TYPE 
RE TURN 


3¢ee PHYSICAL ADDRESS ese 


TAG78$: MOV SS..PHYADD 
SUB oF IRST ,PHYADD 
MOV BANK, PHYADO +2 
ASR PHYADO +2 
Bcc 
BIS #81715, PrvADD 
18: MOV @PHYADD, -( SP) ;POINTER TO DOUBLE WORD ON STACK 
CALL ;CALL DOUBLE PRECISION CONVERSION ROUTINE 
ADO 02.5? iF IX STACK 
TYPE socTs 
RE TURN 


£ SSSSSSSSSSSSSSSESSSSESSSSSSHESESSSSSSESESSSESSSHSESSSESESSESHESEEEESEEHESESESEEEEEEEOEEESE 


3eee OCTAL BYTE see 


LS” dl LL 


TAG79%: TYPE MSGO018 2 SPACES 
TYPOCS @(R1),<TYPE Byte: 3,2 
TYPE MSGO14 ; SPACE 
RE TURN 
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146380 057532 DETAIL: SUBTST <<SUBR DETAILED ERROR REPORT >» 
s PPOSESSSOESEOSEOEEOESSEEEESEEEOOEEEEESEOEEEEEESSEOEEESEEEEEEEEEEEEEEEEEEEEEOEEOS 
3; SUBTEST SUBR DETAILED ERROR REPOR' 
{POSSE SEOSSESESSEEESEEOEEEEOAOSESEEOEEESEEEEEEOEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEOOS 
14651 057532 005237 002214 INC DE TFLAG 
14632 957536 022737 O00003 0022714 chp @3.DETFLAG 
146353 057544 101473 BLOS at 
14634 057546 022737 9000002 002214 cmp @2,.DETFLAG 
14635 057554 001435 BEG 2s 
14636 057556 PUSH 
14627 057566 SET 
14636 057574 005037 002106 CLR 
7600 010037 002174 MOV 
14640 057604 002176 MOV 
14641 057610 910120 MOV 
1 057612 O1 MOV 
14643 057614 010 MOV 
14644 057616 010420 MOV 
14645 057620 O11 MOV 
14646 057622 013720 002022 MOV 
14647 057626 013720 MOV 
14648 057632 013700 002174 MOV 
14649 057636 SET 
14650 057 104015 ERROR 
14651 057646 BR 
14652 057650 2s: PUSH 
14653 057660 SET 
057 005037 002106 CLR 
14655 057672 SET 
14656 057700 10464031 ERROR 
14657 057702 022737 000001 003720 Chop 31S THIS AN 11/44? 
14658 057710 001002 BNE 
14659 057712 005037 177766 CLR 
14660 057716 18: POP 
14661 : 
14662 057726 004737 057532 CALL 
14663 057732 000207 RE 


t 40 
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ERROR REPORT 


sSIPRAATE CONTROL “TI” 
CALL CONTT 


OO4737 061402 43: sDOISPLAY “DISPLAY” INFO 


sTYPE CONTENTS OF ALL CSR'S 
PUSH C Ri 


CRL 
013701 002220 MOV TOTCSRS.R1 
SRLOOP 


006 301 
ERROR 
194426 READCSR 


T ™SGO18 32 SPACES 
END ; OF ON.ERROR 
IF Ri EQ @O THEN LEAVE DUMPCSRLOOP 
END ;OF FOR CSRNO 
DUPPCSRL 
PoP R1.CSRNO.CSR 


TYPE 4SGO088 sKERNEL STACK 
013701 002536 OV KSTACK ,.R1 
162701 000002 SUB @2.R1 
FOR RO := SP TO Ri BY @2 
sCRLF 
TYPOCT RO 
YPE $6018 32 SPACES 
YPOCT (RO) 
END ;OF FOR RO 
:;SET PREVIOUS MODE TO SUPERVISOR 
TST NOSUPER 






005737 002430 





0010% BNE DETi 

042737 030000 177776 BIC *BIT1S!81T12,.PSw 
052737 010000 177776 BIS eBITi2.PSw 
006506 mwrPI 





sp 
R1.RO 
TYPE MSG089 ;SUPERVISOR STACK 
IF RO LT @SUPSTK 


FOR RO := RO TO @SUPSTK-2 BY @2 
TY — 
TYPE MSGO18 32 SPACES 


TYPE M™SGO91 sIS EMPTY 


RO 
14716 SET PREVIOUS MODE TO USER 
14717 060222 052737 030000 177776 ODETI: Is @BITiS!:8IT12,PSw 

006506 I uSsP 





14718 060250 w—P 

14719 060232 POP 

14720 060234 TYPE MSGO90 sUSER STACK 
14721 060240 IF RO LT @USESTK 

14722 060246 FOR RO := RO TO SUSESTK-2 BY e2 


002214 


MACRO 1115 


14 


raWy 
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32 SPACES 


21S EMPTY 


EGANCE 


DIAGNOSTIC 
O OCTA (ASCII> 


- 





060546 
177770 
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(a). a. ee. 


5 FSSSSSSSSSSSFSSSSSESSSSSSSSSSSSSSSSSSESHESSSSSHSSSSSSSSSESESSSSESSESESESSESEEEEEEESE 


s*THIS ROUTINE IS USED TO “2 :. 16-B8IT BINARY NUMBER 10 A 6-DIGIT 


s*OCTAL (ASCII) NUMBER AND T 


I 
;*$TYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TrPE 


7 :;NUMBER TO BE TYPED 
;;CALL FOR TYPEOQUT 
:3N*1 TO 6 FOR NUMBER OF DIGITS '0 TrPt 


;@CALL: 

:¢ MOV 
3;* TYPOS 
;¢ BYTE 
;¢ ‘Te 
;¢ 

3¢ 

& 

3e8TYPOS OR ¢ 
3 *CALL 

;¢ 


;@CALL: 


4t: 





MOV 
TYPON 


ABIRRORPSPRR PS SBR SSSSeoS Boos 3 


NUM, -( SP) 


NUM, -(SP) 


NUM, -CSP) 





€177770,R3 
ae 


Ra 
S$ 
R4 


3;;"-1 OR O 


s:i*TYPE LEADING ZEROS 
;:0*SUPPRESS LEADING ZEROS 


* 
eran dh ttele MERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 


3; ;NUMBER TO BE TYPED 
;;CALL FOR TYPEOUT 


3° 
3@STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


;sNUMBER TO BE TYPED 
;;CALL FOR TYPEOUT 


:sPICKUP THE MODE 
ssLOAD ZERO FILL SWITCH 
ssNUMBER OF DIGITS TO TYPE 
:sADJUST RE ADORE SS 


33;SET THE ZERO FILL SWITCH 
:3SET FOR SIx(6) DIGITS 
33SET ys ITERATION COUNT 


‘8 
ae Be 


RS 
1 GET THE NUMBER OF DIGITS TO TYPE 


;:;SUBTRACT IT FOR MAX. ALLOWED 
3;SAVE IT FOR USE 
3;GET THE ZERO FILL SWITCH 
ssPICKUP THE INPUT NUMBER 

HE OUTPUT WORD 
ssROTATE MSB INTO “C” 


33GO DO SB 
FORM THIS DIGIT 


+ ;CLEAR T 


3s;GET LSB OF THIS DIGIT 
ssTYPE THIS OIGIT? 


;:6R IF 


NO 
33;GET RID OF JUNK 


TURN 


ssTEST FOR O 


: sa 0? 


3;8R IF Y 


3;DON'T SUPPRESS ANYMORE 0'S 


ZMSODO0 
TINE 


Sil ./M DIAGNOSTIC 


BINAR: 


000060 
000040 
060542 


060544 


S$: 


6%: 


7$: 


8s: 
sOCNT: 


SOFTILL: . 


Hid 


MACRO M1115 i4 JAN-62 16:15 PAGE 466-1 
TO OCTA CASCII) AND TYPE 


eaeee= 
: 


CoooOo “AN AAAN 


2;MAKE THIS DIGIT ASCII 

:sMAKE ASCII IF NOT ALREAD? 
33:SAVE FOR TYPING 

::GO TYPE THIS DIGIT 

;;COUNT BY 1 

:3;8R IF MORE TO DO 

:;8R IF DONE 

3: INSURE LAST DIGIT ISN‘T A BLANK 
3:G0 00 — DIGIT 


R3 
33SET THE STACK FOR RETURNING 


; sRETURN 

;;STORAGE FOR ASCII DIGIT 

3s TERMINATOR FOR TYPE ROUTINE 
:;OCTAL DIGIT COUNTER 

:3;ZERO FILL SWITCH 

;sNUMBER OF DIGITS TO TrPE 


ZMSOO0O MS1i ./™ OIAGNOSTIC 
CONVERT BINARY 





177777 


000002 





MACRO M1115 
TO DECTMAL AND TYPE 


177777 


177776 


000004 


;*BEFORE THE FIRST DIGIT OF 


1a 
14-JAN-62 16:15 PAGE 467 


-SBTTL ROUTINE CONVERT BINARY TO DECIMAL AND TYPE 
Perri iii itritiiiirrirrirririririririree 
:*THIS ROUTINE IS USED TO CHANGE A 16-8IT BINARY NUMBER TO A 5-DIGIT 
s*SIGNED DECIMAL (ASCII) 


;*REPLACED WITH SPACES. 


7 @CALL: 


3¢ 
sTYPOS: 


1%: 


2s: 
3%: 


4%: 


98: 


SOTBL: 


sDOBLK: 


AND TYPE IT. 


NUMBER DEPENDING ON WHETHER THE 
s°NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPEL 


THE NUMBER. LEADING ZEROS WILL ALWAYS GE 


33;PUT THE BINARY NUMBER ON THE STACK 
33GO0 TO THE ROUTINE 


33SET BLANK SWITCH AND SIGN 
:;GET THE INPUT NUMBER 


73:8R IF INPUT IS POS. 


;;MAKE THE BINARY NUMBER POS. 

13;MAKE THE ASCII NUMBER NEG. 

3;ZERO THE CONSTANTS INDEx 

3;SETUP THE QUTPUT POINTER 

33;SET THE FIRST CHARACTER TO A BLANK 


;;CLEAR THE BCD _— 


;;GET THE CONSTAN 


73FORM THIS BCD DIGIT 
DONE 


MOV NUM, -( SP) 
TYPOS 
PUSH RO,R1,R2,R3,R5S 
MOV #20200, - ) 
MOV 20(SP),RS 
BPL 18 
NEG 
MOVB -,1¢0SP) 
CLR 
MOV @$0BLK RS 
“OVB @ ,CR3)- 
CLR R2 
MOV SOTBLCRO),R1 
SUB R1 RS 
BLT at 
INC R2 
BR 38 
ADO R1,R5 
TST 
BNE 53 
TSTB (SP) 
BMI 7$ 
ASLB (SP) 
Bcc 6% 
MOVE iCSP), -1¢€R3) 
BIS @’'0,R2 
BIS @' ,R2 
MOVB R2,CR3)> 
TST de 
chp RO, #10 
BLT 2% 
BGT 8% 
MOV RS ,R2 
6% 
TST8 (SP )- 
9% 
-1¢SP), ~2(R3) 
CLRB CR 
POP RS ,R3.R2S,R1,.RO 
TYPE $D6LK 
MOV 2(SP).4(SP) 
MOV CSP)+, (SP) 
RTI 
10000. 
1000. 
100. 
0. 


0,0,0,0 


IF 
; ;s INCREASE THE BCD DIGIT BY i 


;:;ADD BACK THE CONSTANT 
3 ;CHECK IF BCD DIGIT=0 


33;FALL THROUGH IF O 
ssSTILt - - LEADING 0'S? 
;;6R IF YES 

33™SO? 

3;6R IF 


IF NO 
3s YES--SET THE S 


MAKE 
s3:MAKE IT 
ssPUT THIS CHARACTER IN 

T INCREMENTING 


JUS 
3;CHECK THE TABLE INDEX 
33GO DO THE NEXT DIGIT 


SIGN 


THE < DIGIT ASCII 
A SPACE IF 4d ALREADY A DIGIT 


33G0 TO EXIT 
3;GET THE LSO 
33GO CHANGE TO A 


:;ADJUST THE STACK 
: ;RETURN TO USER 


THE OUTPUT BUFFER 


’ sciIi 
3 WAS a ines THE FIRST NON-ZERO? 


IF 
33;YES--SET THE SIGN FOR TYPING 
33SET THE TERMINATOR 


33NOW TYPE THE NUMBER 


t UL NCE 


7 


7 


CZMSODO MS1i1 ./™ DIAGNOSTIC 
ROUTINE TTY INPUT 


14930 040 
14931 061042 
14932 061046 
14933 061052 
14934 054 


MACRO 1115 


sCKSWR: 


6%: 


SGTSUR: 


3%; 
4t;: 


5%: 


78; 


14-JAN-62 16:15 PAGE 468 


SE QUE NCE 


-SBTTL ROUTINE TTy INPUT 

beeen anne eamnae sone soPnoeseoeseeesetesansscoccconcensncsnsssoossqote 
;*SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 

;*ROUTINE IS ENTERED FROM THE TRAP HA HANDLER, WILL 

;*SERVICE THE TEST FOR CHANGE IN SOF TWARE éurten REGISTER TRAP CALL 

;@WHEN OPERATING IN TTY FLAG MODE. 


-ENABLE LSB 

TST XOCHAR 

BEQ NOCH 

MOV XOCHAR , -( SP ) 

CLR XOCHAR 

IP CONTS1 

TST8 esTKS 

BPL 12% 

MOVB StTKB, -( SP) 

BIC @7C177,(SP) 
: CMP @6,(SP) 

BNE 1$ 

CALL FIELOSERVICE 

CMP 024, ) 

BNE 16% 

CALL CONTT 

CMP @3,(SP) 

BEG S$ 

CMP €23,(SP) 

BNE 17% 

CALL CONTS 

CMP #13.(SP) 

BNE 6$ 

TYPE sCNTLK 

MOV CTLKVEC, SP 

RE TURN 

CMP @SWREG , SUR 

BNE CKEND 

CMP @7,(SP) 

BNE CKEND 

TST sAUTO 

BNE CKEND 

TYPE SCNTLG 

TYPE sMSUR 

TYPOCT &SWR 

TYPE SMNEW 

CLR -(SP) 

-(SP) 

TSTB SsTKS 

BPL ay 

OVS asT r -(SP) 

BIC @?C177,(SP) 

CMP (SP),03 

BNE 78 

TYPE sCNTLC 

ADO 6 , SP 

JP T 

CMP (SP),@25 

BNE 9% 

TYPE SCNILU 


3;SOMETHING THERE? 
ON IF NOT 


VE THE 
:3STRIP-OFF THE ASCII 
:IS IT CONTROL F? 
sNO SKIP 


:IS IT CONTROL T? 

: - SKIP 

sYES - CALL CONTROL T ROUTINE 

:IS IT CONTROL C? 

sYES EXIT eeseeNOTEseses STACK IS SCREWED UP! 
:IS IT CONTROL S? 

3sNO - SKIP 

;YES - CALL CONTROL S ROUTINE 
3IS IT — K? 


sRESET KSP TO AFTER PATTERN EXEC ROUTINE 
sRETURN TO PATTERN EXEC ROUTINE 
33IS THE ps a SELECTED? 


; sBRANCH 

ssIS IT A CONTROL G? 

33NO, RETURN TO USER 

sARE WE RUNNING IN AUTO-MODE? 
;BRANCH IF YES 

;;ECHO THE CONTROL-G ('G) 

13 TYPE a” CONTENTS 


ICK UP 
ssMAKE IT 7-BIT ASCII 
3sIS IT A CONTROL -C? 


AN UP 
ssCONTROL-C RESTART 
s3IS IT var -U? 


536R 
1s YES, ECHO CONTROL -U (rU) 


MS11-./™ DIAGNOSTIC 
TTy INPUT 
061244 062706 000006 
061250 000746 
061252 021627 000015 
061256 001016 
061260 766 000004 
061264 001405 

1266 016677 000002 
061274 062706 000006 
061300 
061304 000002 
061306 062706 000002 
0613512 
061314 004737 053556 
061320 021627 
061324 
061326 021627 000067 
061332 003015 
061334 042726 000060 
061340 005766 000002 
061344 001405 
061346 006516 
061350 006316 
061352 006316 
061354 000002 
061360 056616 177776 
061364 000702 

1366 
06137 000724 
061374 136 115 
061377 012 000 


mart 


MACRO M111" 14 JAN-82 16:15 PAGE 468-1 
63: ADD 06, SP 
BR 38 
9%: CMP (SP),@15 
BNE 138 
TST 4( SP) 
BEQ 108% 
121304 MOV 2( SP), @SwR 
108: ADO 06 .,SP 
TYPE sCRLF 
123: RTI 
CKEND: ADD 02.,SP 
RTI 
13%: CALL sTYPEC 
CMP SP), 060 
BLT $ 
CMP CSP), 067 
BGT 15% 
BIC @60,(SP)- 
TST 2(SP ) 
BEG 14% 
ASL (SP) 
ASL (SP) 
ASL CSP) 
148: 2( SP) 
BIS -2(SP),(SP) 
BR 4% 
158: TYPE sQUES 
BR 83 
O15 SsCNTILK: .ASCIZ /tK/<15><12> 
-EVEN 


.OSABL LSB 


3: IGNORE PREVIOUS INPUT 
;3LET’'S TRY IT AGAIN 
31S IT “asta 


; ;BRANCH 
7;3:YES, IS IT THE FIRST CHAR? 
IF YES 


33 
:;SAVE NEW SUR 
;:CLEAR UP STACK 
3;:ECHO <CR> AND <LF> 


3; sRETURN 
sFIX STACK 
RE 


3;STRIP-OFF ASCII 

33I1S THIS THE FIRST CHAR 
; ;BRANCH IF YES 

:3NO, SHIFT PRESENT 

33 CHAR OVER TO MAKE 


;;GET THE NEXT ONE 

3s; TYPE ?<CR><LF> 
;;SIMULATE CONTROL -U 
;CONTROL K ASCII STRING 


>t. @JENCE 


444 


ZMSD00 
ROUTINE 


MS11-./™ DIAGNOSTIC 
TTy INPUT 


061402 


061514 


121120 
121114 
177600 


061034 


“aACRO 1115 


‘ 
eee ibe 4 


14 JAN-82 16:15 PAGE 470 SEGANCE 07% 


CONTT: SUBTST <<CONTROL T>> 


§ FSSSSSSSSSSSSSSSSSSSSSSSSSSSESESSESESESSSESESETESESESESESEEEESEEEEEESEEEOEEEEEEEEOEE 


; ¢SUBTEST CONTROL T 
{ POOP SSSSSEESEESOEESSESEEOSEESESEEE SEO ESEEEEEEEEESEEEEEEEEEEEEEEEEEEEEEEEEEEDEES 
PUSH RO 

TYPE sCRLF 
IF RLFLAG IS TRUE 
TYPE 


;RELOCAIED 
END ;OF IF RLFLAG 
TYPE M™SGO93 ;BANK= 
Mae S BANK, .3 sTYPE 3 DIGITS 
Y 3 . 
TYPOCcsS REALPAT,.2 :;TYPE 2 DIGITS 
POP 
RETURN 
CONTS: SUBTST <<CONTROL S € CONTROL Q>> 


§ FSSSSSSESSSSSSSESSESEESSESEESESSSESSESSESESSSESEESESSEESESESEESEESEESESEEEEEEEHEEEEEEEE 


3; *SUBTEST CONTROL S € CONTROL @ 


j PPEOOEOEEEEEEEEEEEEESESEEESESEEEEESEEESEESESEEESEESEESEESESEEEEEEEEEEEDEDEEEEES 
POP RO ;GET RIO OF RETURN ADDRESS FROM STACK 

CONTS2: TSTB asTKS ;WAIT FOR CHARACTER 
BPL CONTS2 

MOvVB St TKB, (SP) sREPLACE OVER OLD CHARACTER ON STACK 

BIC @*C177,(SP) ;STRIP ALL BUT ASCII 

IF (SP) EQ @21 ;IF IT IS A CONTROL Q 

JP CONTS1 
ELSE 


BR CONTS2 
END ;OF IF (SP) 


ee eee - ee 


000004 
121054 
121050 
177600 
000004 
121022 
121016 
177600 
000021 
000004 
000004 
000004 


MACRO M1115 


000023 


120666 


Mi 


14. JAN-82 16:15 PAGE a7 SEQUENCE TT 


FF SSSSSSSSSSSSSESSESSSSSSESSSSSSESSESSSSESSESHESSSSSESESSSESESSSESSSEESSESEEESEERESEEEOESES 


;*THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTy 


;*CALL: 
;¢ ROCHR :: INPUT A SINGLE CHARACTER FROM THE TTy 
;¢ RETURN HERE ; ;CHARACTER IS ON THE STACK 
3¢ : WITH PARITY BIT STRIPPED orFr 
8 
SROCHR: MOV (SP). -CSP) 3 DOWN THE PC 
MOV 4(SP).2¢SP) 3;SAVE THE PS 
1%: TSTs asTKs ;;WAIT FOR 
BPL is ;3A CHARACTER 
MOVB St TKB,4(SP) : }READ THE TTY 
BIC @*C<177>,4(SP) ;;GET RID OF JUNK IF ANY 
CMP 4(SP),@23 ::IS IT A CONTROL -S? 
BNE $ ; ;sBRANCH IF NO 
2s: TsTe asTKsS y WAIT FOR A CHARACTER 
BPL 2s 3;LOOP UNTIL ITS THERE 
MOVB @sTKB, -( SP) 3:GET CHARACTER 
BIC @tC177.(SP) ;sMAKE IT 7-BIT ASCII 
CMP (SP)+, 021 3:IS IT A CONTROL -Q? 
BNE 4 NOT DISCARD IT 
eR i$ ;YES, RESUME 
3%: CMP 4(SP),@21 1318 IT A RANDOM CONTROL -Q? 3R-C 
BEG e 3 :;BRANCH BACK IF SO 3R-C 
CMP 4(SP), #140 i318 IT UPPER CASE? 
BLT 4% ; ;BRANCH IF YES 
CMP 4(SP),0175 1318 IT A SPECIAL CHAR? 
BGT 4s 3 ;BRANCH IF YES 
BIC #40 ,4( SP) :;MAKE IT UPPER C 
4%: RTI 33GO TO 


§ SSSSSSSSSSESESSSESSEEHSSHESESSSSEESSESESSSHSESSESESSEESESEOAESEEHESEEEEEEESEEEEEEEEEE 


erate ROUTINE WILL INPUT A STRING FROM THE TTY 


34 RDLIN ssINPUT A STRING FROM THE TTY 
36 RETURN HERE 3 sADDORESS OF FIRST CHARACTER Bey BE ON THE STACK 
34 ss TERMINATOR WILL BE A BYTE OF ALL O'S 
SROLIN: MOV R3,-(SP) 1:;SAVE R3 
CLR -(SP) ;;CLEAR THE RUBOUT KEY 
18%: MOV @sTTYIN,R3S 33;GET ss 
2s: CMP @STTYIN+20. ,R3 ; ;BUFFER FULL? 
BLOS 8s 33;0R IF YES 
ROCHR 33:GO READ ONE ene rae FROM THE TTY 
MOVB CSP)+,CR3) + 1GET CHARACTER 
CMPB @3,CR3) 3318S IT A CONTROL -C? 
BNE 3% ; sBRANCH IF NO 
TYPE sCNTLC ss TYPE A CONTROL-C (fC) 
TST (SP) 3:CLEAN RUBOUT KEY OFF OF THE STACK 
MOV CSP )+,R3 ;:RESTORE RS 
BIT BITS. 8SWR 3318S THERE A HALT FLAG SET IN THE SWR? 
BEG 11% 3 ;BRANCH IF NOT TO BOOT ROUTINE 
CLR STOPOK ;;GET READY TO HALT PROGRAM 
JMP EXIT +:GO HALT PROGRAM 
118%: JMP BOOT 33GOTO eg RESTART 
38: CMPB #177,(R3) 3318S IT A RUBOUT 
BNE 53 ;;8R IF NO 
TST (SP) 31S THIS THE FIRST RUBOUT? 


NiO 


15145 


.EVEN 


CZMSD00O MS11-L/M DIAGNOSTIC MACRO M1113 14-JAN-82 16:15 PAGE 471-1 SEQUENCE 
CONTROL S € CONTROL @G 
15096 061740 001007 BNE ro ::BR IF NO 
15097 061742 112737 000134 062140 MOvVB @*\,108 :;TYPE A BACK SLASH 
15096 061750 TYPE 10% 
15099 061754 012716 177777 MOV @-1.(SP) :;SET THE RUBOUT KEY 
15100 061760 005303 4%: DEC R3 ; ;BACKUP BY ONE 
15101 061762 020327 062142 CMP R3,e@sTTYIN + STACK EMPTY? 
15102 061766 103434 BLO $ :;BR IF YES 
15103 061770 111337 062140 MOvVB (R3).10$8 ;:;SETUP TO TYPEOUT THE DELETED CHAR. 
15104 061774 TYPE 10% ;;GO TYPE 
15105 062000 000725 BR es ;:;GO READ ANOTHER CHAR. 
$106 062002 005716 5%: TST (SP) ; sRUBOUT KEY SET? 
15107 062004 001406 BEG 6% ;;8R IF NO 
51 062006 112737 000134 062140 MOVB @*\,108 3;TYPE A BACK SLASH 
15109 062014 TYPE 108% 
15110 062020 005016 CLR (SP) ;:;CLEAR THE RUBOUT KEY 
15111 062022 122713 000025 6$: CMPB @25,CR3) 33I1S CHARACTER A CTRL UV? 
062026 001005 BNE 78 ;;6R IF NO 
15113 062050 TYPE SCNTLU 33TYPE A CONTROL “U” 
15114 062034 000705 BR +) ;;GO START 
15115 062036 122713 000022 78: CMPB @22,CR3) 3:IS CHARACTER A “tR"? 
15116 062042 001011 BNE 9% :3 IF NO 
15117 062044 105013 CLRB (R3) ;;CLEAR THE CHARACTER 
15118 062046 TYPE sCRLF s3TYPE A “CR” E “LF” 
15119 062052 TYPE sTTYIN ;; TYPE THE INPUT STRING 
062056 000676 BR es ;33;GO0 PICKUP ANOTHER CHACTER 
15121 062060 8%: TYPE sQUES 3;3;TYPE A ‘?' 
062064 7 BR i$ ;;CLEAR THE BUFFER AND LOOP 
111337 062140 9$: MOVB CR3),108 :3sECHO THE CHARACTER 
15124 06207 TYPE t 
15125 062076 122723 000015 CMPB #15,(R3)- ; ;CHECK FOR RETURN 
15126 062102 001264 BNE ;;LOOP IF NOT RETURN 
15127 062104 105063 177777 CLRB -1CR3) 3 ;CLEAR — (THE 15) 
151286 062110 TYPE $LF 331TYPE A LINE F 
062114 005726 TST CSP )> ; CLE EAN RUBOUT KEY FROM THE STACK 
151350 062116 012603 MOV C(SP)+,R3 s sRESTORE R3 
15131 062120 011646 MOV (SP), -(CSP) s;sADJUST THE STACK AND PUT ADORESS OF THE 
15 062122 016666 000004 000002 MOV 4(SP),2¢SP) 33 FIRST ASCII CHARACTER ON IT 
15133 062130 012766 062142 000004 MOV @STTYIN,4 (SP) 
iS 062136 RTI ; sRETURN 
15135 062140 000 108: BYTE O ; sSTORAGE FOR ASCII CHAR. TO [TYPE 
15136 062141 000 BYTE O 3: 3 TERMINATOR 
15137 062142 000024 STTYIN: .REPT 20. ; sRESERVE SIZE BYTES FOR TTY INPUT 
15140 062166 136 103 015 sCNITLC: .ASCIZ /tC€/<15><12> ssCONTROL “C” 
062171 012 000 
15141 062173 136 125 01S SsCNTLU: .ASCIZ /tU/<15><12> ;;CONTROL “U” 
062176 012 000 
15142 062200 py ol 015 sCNTLG: .ASCIZ /tG/<15><12> ::CONTROL “G” 
15143 062205 015 0i2 123 ‘SMSWR: .ASCIZ <15><12>/SWR = / 
062210 127 122 040 
062213 075 040 000 
15144 062216 040 040 116 SMNEW: .ASCIZ / NEW = / 
062221 105 127 040 
062224 075 040 000 


537 


15175 062306 
15176 062310 
15177 062312 
15176 0625 





ay OI AGNOSTIC 


tb} i 


MACRO MLIIS 14 JAN-B2 16:15 PAGE 472 AS NCE 


Am OCTAL NLPIBER FROM Tee ITT 


177770 


000012 
062376 


.SBTTL ROUTINE READ AN OCTAL NUMBER FROM Tre TI? 
§ PSSSSSSSSSSSSSSSSSSSSSSSSSSESESESEESESSESESSESEOEESSESSEEEEEOESEEEEEEEEEEEEEEEESS 
s*THIS ROUTINE WILi READ AN OCTA& (ASCII) NUMBER FROM Tee '*, AND 
3; @CHANMGE IT TO SINARY. 
seTHE INPUT CHARACTERS WILi BE CHECKED TO INSURED THEY ARE LEGA 
:*OCTAL ay LA IF AM ILLEGAL CHARACTER IS READ A ~?” wILt BE TYPED 
:°FOLLOMED BY A CARRIAGE RETURN-LINE FEED. THE COPPLETE NUMBER mus’ 
ry BE RETYPED. THE INPUT IS TERMINATED BY TYPING A CARRIAGE RETURN. 
3 is 





























3¢ RDOC T 7 :READ AN OCTAL NUMBER 
s° RETURN HERE ;:.0N¢ ORDER BITS ARE ON TOP OF Trt STACK 
3° ;:4IGH ORDER BITS ARE IN seIOC’ 
SRDOCT: MOV (SP), -(SP) :sPROVIDE SPACE FOR ‘Tre 
OV 4(SP).20SP) :3; INPUT NUMBER 
PUSH RO.R1,.R2 
18: RDL IN ;;READ AN ASCIZ LINE 
“OV (SP )+,RO 3:GET ADORESS OF 1S' CHARACTER 
Ov RO.S$ 33;4ND SAVE IT 
CLR Ri ;;CLEAR DATA WORD 
CLR R2 
2s: *OvB ssPICKUP THIS CHARACTER 
BEG $3 GET OuT 
cops 23"AKE SURE THIS CHARACTER 
BGT iaIS AN OCTM& DIGIT 
Corrs 
GLT 
ASL s3°2 
ROL 
ASL :304 
ROL 
ASL 3308 
ROL 
sIc ssSTRIP THE ASCII JUNK 
ADO 33400 IN THIS OIGI’ 
BR 3 sL OOP 
38: Ts! 3:;CLEAN TERMINATOR FROM STACK 
MOV SISAVE THE RESULT 
OV 
POP 
eT T 3; sRE TURN 
46: TST s;CLEAN PARTIAL FROM STACK 
33SET A TERMINATOR 
TYPE s3 TYPE UWP THRU THE BAD CHAR. 
S$: . WORD 
TYPE s INPUT MUST BE A 
T sN OCTAL 
TYPE SG064 5 
BR y 33 TRY AGAIN 
SHIOCT: .WORD HIGH ORDER BITS GO MERE 
“SBTTL ROUTINE READ A DECIMAL MUMBER FROM THE TTY 





£ SSSSSSSSSSHSSSSHSSSSSSHSSSSSHSSSSSESSESSSESSSESSSSHSSSSESSEEESESOSSOESESEEEEHOESESEES 


ILLEGAL CHARACTERS 
FEED WILi BE TYPED. 

COMPLETE NUMBER THE INPUT IS TERMINATED 4 Toe 
;*USER TYPING A CARRIAGE RETURN. THE RANGE OF THE INPUT NUMBER 


gz 





DIAGNOSTIC 
CIMA, 


MACRO 1115 


MBER FROM THE TTY 





000012 


1%: 


2s: 


38: 


4%: 


5%: 


6%; 


SRDODEC : 


ae a a 
14 JAN-82 16:15 PAGE 472-1 


RDDE C 

RETURN HERE 

MOV (SP), -CSP) 
mov 4(SP).20SP ) 
PUSH RO.R1,R2 
ROL IN 

MOv (SP )-,RO 
MOV RO.6$ 

CLR -(SP) 

CLR 

CMPB : -, (RO) 
BNE 

MOvB CRO)+ .R2 
MOvB (RO)+.R1 
BEG 38 

ChPa @'O0,R1 

BGT S$ 

ChPsB o’°9,R1 

BLT Ss 

BIT @¢C7777,.CSP) 
BNE S$ 

ASL (SP) 

MOV (SP), -(SP) 
ASL (SP) 

ASL (SP) 

ADO (SP )+, (SP) 
BvS 58 

SUB @°0,R1 
ADO R1.(SP) 
BvS S$ 

BR 2s 

TST Re 

BEQ Se 

NEG (SP) 

MOV (SP)+,12¢SP) 
POP R2,R1,RO 
RTI 

TST (SP )-+ 

CLRB CRO) 

TYPE 

-WORD 0 

TYPE MSGO062 
TYPE MSGO065 
TYPE MSGO064 

BR is 


s*POSITIVE 32767 TO NEGATIVE 327684. 
;@CALL: 


::READ A DECIMAL NUMBER 
ssNUMBER IS ON TOP OF Tet STACK 


;:;PROVIDE SPACE FOR 
33 THE INPUT NUMBER 


ssREAD AN ASCIZ LINE 
:sADDRESS OF 1ST CHAR. 


ve 
33SEE IF A MINUS SIGN WAS TYPED 
3;6R IF NO MINUS oe 
::;SAVE FOR LATER 
; PICKUP THIS CHARACTER 
OuT IF ZERO 


3; 3:GET 
s:MAKE SURE THIS CHARACTER 
31S A DIGIT BETWEEN O € 9 





;;00N’'T LET NUMBER GET TO BIG 
—e IF NUMBER WOULD OVERFLOW 
33¢ 

3;SAVE FOR LATER 


; ;OVERFLOW ISN'T ALLOWED 
33sSTRIP AWAY THE ASCII JUNK 
::ADO IN THIS DIGIT 

; sOVERFLOW ISN‘ T ALLOWED 


3; sL OOP 
3 ;CHECK IF NUMBER IS NEG 
s3 IF NO 
33 YES--NEGATE THE NUMBER 
:;SAVE THE RESULT 


; RETURN 


;:CLEAN PARTIAL NUMBER FROM STACK 


33:SET A TERMINATOR 


sNUPBER 
33 TRY AGAIN 


ROUT ine 


S13 ./" 


SAVE AND 


RESTORE ADRS 


7 
—_ -. -& 
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.SBTTL ROUTINE SAVE AND RESTORE RO-RS 
F SFSSSSSSSSSSSHSSSSSSSSSSSSSSSSESSSSSSSSSSSS*ESESSSOSSEESESSSEESEEESEEESEEEEEEERE EEE 
2@SAVE RO-RS 
;@CALL: 
3° SAVREG 
:®UPON RETURN FROM SSAVREG THE STACK wWILi LOOw LIVE: 
;¢ 


s@TOP ---( +16) 
s@ *2---( +186) 


3@ 04---RS 

3@ *6---R4 

3@ *8---R3 

3#°10---R2 

3@e12---R1 

3#°14---RO 

SSAVREG: 
PUSH RO.R1,R2,R3,R4.RS 
MOV 22( SP), -C SP) +3;SAVE PS OF MAIN FLOW 
MOV 22(SP), -( SP) 3;SAVE PC OF MAIN FLOW 
MOV 22( SP). -( SP) 33SAVE PS OF CALL 
MOV 22( SP), -( SP) 3;SAVE PC OF CALL 
RTI 

s*RESTORE RO-RS 

;*CALL: 

i¢ RESREG 

sRESREG: 
MOV (SP )+,22(SP) ssRESTORE PC OF CALL 
MOV (SP )+,22¢ SP ) ; RESTORE PS OF CALL 
MOV (SP )+,22¢ SP) s sRESTORE PC OF MAIN FLOW 
MOV (SP )+,22¢0SP) 1 sRESTORE PS OF MAIN FLOW 
att RS ,R4,R3,.R2,R1,RO 


MS11-./™ DIAGNOSTIC 
NUMBE 


CZMSD0O0 
ROUTINE RANDOM 


15317 062746 
15318 062754 


R GENERATOR 


010137 
000207 


Fil 
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& GJALNCE 


-SBTTL ROUTINE RANDOM NUMBER GENERATOR 


£ FSSSSSSSSSSSSSSSSSESSESSSESSESESHESSSSSSSESSSHEESESOSSESESEESSEEESEEESESEESESESEEESEEEEEES 


s*THIS ROUTINE IS A DOUBLE PRECISION PSEUDO R 
;eWITH A RANGE OF O TO 2ee(-+33)-1 


:*CALL: 

7° CALL SRANOD 

;¢ RE TURN 

;¢ 

3° 

SRAND: PUSH RO,.R1,R2 
MOV EDLO,RO 
MOV SEEDHI .R1 
MOV @7,R2 

i$: ASL RO 
ROL Ri 
soB R2,1$% 
ADD SEEDLO,RO 
ADC 1 
ADO ® 
ADO #1057 ,R0 
ADC 1 
ADO €47401,R1 
MOV ° 0 
MOV R1. SEEDHT 
POP oR1,RO 
RE TURN 


R GENERATOR 


:;CALL THE ROUTINE 
;;RETURN HERE THE RANDOM 
7 ;NUMBER WILt BE IN 

33 SHINUM, 6. ONUM 


3;SET RO WITH LOW 

sSET R1 WITH HIGH 

;SET SHIFT COUNT 

:3;SHIFT RO LEFT AND 
;sROTATE CARRY INTO R1 AND 


;ADD NUMBER TO MAKE x 129 
ARRY 


$3 
:3:ADD HIGH CONSTANT 


riil 


CZMSCOO S11 -./™ DIAGNOSTIC MACRO M1113 14- —- 62 16:15 PAGE 476 EQGANCE 4% 
ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT 

15321 -SBTTL ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT 

153822 § SSSSSSESSSSSSSSSSSSSESSSSSSSSESESSESESSESESSSSSSSEESSEESESESSEESESEEESEEESESESEEEEEEEES 

15325 s¢THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUNBER 10 AN 

15324 s*UNSIGNED OCTAL ASCIZ NUMBER. 

15325 3 @CALL 

15326 :¢ MOV OPNTR, -C SP) +sPOINTER TO LOW WORD OF BINARY NUMBER 

15327 :° CALL $0B20 3:CALL THE ROUTINE 

taaee i* RE TURN 33 THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK 

15330 

15531 062756 104415 $0820: SAVREG ssSAVE ALL REGISTERS 

153532 062760 016601 000002 MOV 2¢(SP).R ssPICKUP THE POINTER TO LOW WORD 


153353 062764 012705 0635075 MOV esOCTWL 135..RS5 ;:POINTER TO DATA TABLE 
15334 062770 012704 000014 MOV #12. ,R4 3:00 ELEVEN CHARACTERS 
15335 062774 012703 177770 MOV etC7.R3 MASK 

12100 a (R1)+,RO 











15537 063002 012101 (R1)+.R1 
15338 063004 005002 CLR fee 
15339 063006 110245 1s: “OvB R2, -C(RS) 
15340 063010 010002 RO,R2 
15341 063012 0053504 DEC RA fa 
15342 063014 003007 8GT 3% ;;BR IF NOT THE LAST OIGIT 
15343 063016 001405 BEQ 2s ;3;8R IF IY IS THE LAST DIGIT 
15344 063020 005205 INC RS ;sALL DIGITS DONE-ADUJUST POINTER FOR FIRST 
15345 063022 010566 000002 MOV R5.2(SP) ;;ASCIZ CHAR. € PUT IT ON THE STACK 
15346 063026 104416 RESREG ; sRESTORE ALL REGISTERS 
15347 063030 000207 RE TURN ; ;sRETURN TO USER 
15346 0635032 006203 2s: ASR R3 s:POSITION THE MASK FOR THE LAST DIGIT 
15349 063034 0606001 38: OR Ri ::POSITION THE BINARY NUMBER FOR 
15350 0635036 006000 ao a 3 THE NEXT OCTAL DIGIT 
ROR RO 
ACR Ri 
ROR RO 
15355 063050 040302 BIC R3,R2 33;MASK OUT ALL JUNK 
062702 000060 ADO @'0,R2 ;;MAKE THIS CHAR 
15357 063056 000753 BR is 3:GO PuT IT IN THE DATA TABLE 
15358 063060 000016 SOCTVL: .REPT 14. ; sRESERVE DATA T 


ABL 
15341 06 3064 sOCTS«sOCTVL +4 sPOINTER TO 11 DIGIT NUMBER 


CZMSDDO S11. -™ DIAGNOSTIC 


3 
15414 
15415 


063152 
063154 


063156 
063160 


000101 
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. SBTTL 
. SBTTL 


PT 


: 
r 
°o 


z" 
Zn 


T 


25 
< 
~ 
m 


TABLES 


° ' 
+ s 


APT MAILBOX -E TABLE 


eoooo0o0o°o 


3 sENV 
T #7 IS SET IN SENVM T 
AT 8MADR4) MUST BE FILLED IN TO INDICATE THE PROPER AMOUNT OF 
“ OF MEMOR 


101 
0 
0 


177776 


oo oocooooooceocoooo 


:3MESSAGE TYPE CODE 
s3;FATAL ERROR NUMBER (ERROR PC) 
2:3; TEST PATTERN NUMBER 


E 
sSET TO A i FOR APT AUTO MODE 
TABLE BELOW (BEGINNING AT $SMAMS1 AND 


Y. 


sENVIRONMENT MODE 

sBIT7C200)"USE APT SIZE INFO ;8IT5S(40)*NO CONSOLE 
:3:APT SWITCH REGISTER 

:USED TO LIMIT oes NUMBER OF PASSES 


OP 
BITS 15-11°CPU TYPE 
11/0401, | he oy £ ie eens See Sees 
11/7006 ,PDQ*07,Q*10 
BIT 10=REAL TIME CLOCK 
BIT 9=FLOATING POINT PROCESSOR 
BIT 6*MEMORY MANAGEMENT 
3sHIGH ADDRESS, — BYTE ,;DEFAULT = 64K 


: MEM. TYPE ,BLKe 
MEM. TYPE BYTE -- Vey BYTE) 





900 NSEC CORE 
300 NSEC BIPOLAR-002 
PARITY MOS*003 
ERROR CORRECTING MOS-004 
:sHIGH ADORESS.BLKO1 
MEM.LAST ADOR. 


:sHIGH ADDRESS.M.S. 
13MEM. TYPE .BLKe2 
;MEM_LAST ADORESS .BLKe2 
ssHIGH ADDRESS .™.S.BYTE 
3; MEM. TYPE .OLKeS 
33MEM.LAST ADORESS ,BLKes 
: »MIGH oy yt .S.8YTE 













pas ous PRIORITYO1 
Y 
2BUS PRIORITYe2 
:;BASE ADDRESS OF EQUIPMENT UNDER TEST 
S DEVICE MAP 


t SANE 


*3 Byres, » THIS WORD AND LOW OF “TYPE” ABOVE 


rij j 
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SBT RAILOOR E TABLE emma 

15417 :; THE FOLLOWING LOCATIONS SPECIFY _— PATTERNS 

seats = TO BE RUN FOR PARTICULAR MEMORIE 

i 

15420 | REFERENCE THE TABLE LISTED GELOW TO RELATE BITS TO PATTERNS. 

15421 ;sBITO SET WILL RUN THE FIRST ENTRY IN THE TABLE, BITO SET 

‘ae ;IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE ... 

1 3 

15424 sNOTEee NULL TESTS DO NOT TAKE ANY TIME 

15425 3 sFIELD SERVICE VALLE 

15426 0635162 177777 s00WO: .WORD 177777 ;€CC CSR TESTS 177777 TABLE + MKCSRT 

15427 063164 177777 st00Wi: .WORD 177777 ,€CC CSR TESTS 177777 TABLE = MKCSRT 

15426 065166 177777 s00uU2: .WORD 177777 ;ECC PATTERNS 103777 TABLE + MKPAT 

15429 063170 177777 $00W5: .WORD 177777 ;E€CC PATTERNS 177777 TABLE = MKPAT 

15430 0635172 177777 s00w4: .WORD 177777 ,;PARITY PATTERNS 003777 TABLE « MUPAT 

15431 063174 177777 s00WS: .WORD 177777 ;PARITY PATTERNS 177774 TABLE = MUPAT 

15435 063176 SE TEND: 

154356 ;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-POPi11 DIAGNOSTIC 

ert s INTERFACE SPEC. 

15439 063176 SAPTHD: 

1 063176 SHIBTS: .WORD Oo 33;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

15441 063200 063076 SMBADR: .WORD sMAIL ; ;ADORESS OF APT MAILBOX (BITS 0-15) 

15442 063202 000045 sTST™: .WORD 7. 33;RUN TIM OF LONGEST TEST 

15443 063204 001274 SPASTM: .WORD 700. :3;RUN TIME IN SECS. OF 1ST PASS ON 128K (QUICK VERIFY) 

1 06 000000 SUNITM: .WORD OO. ;;EXTRA RUN TIME OF A PASS FOR EACH ADDITIONAL 128K (QV) 

15445 063210 000040 . WORD SETEND-SMAIL/2 ;;LENGTH MAILBOX -ETABLE(C WORDS) 


346 
15470 063246 
15471 063252 
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‘ 4 a a. 


.SBTTL ROUTINE TRAP DECODER 


errr iiiriiiriiriritiritrririririirrrirrrrirririrrirrie 
s*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP INSTRUCTION 

;*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADORESS 

;*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT wILi 


;°GO TO THAT ROUTINE. 


STRAP: MOV RO, -(SP) 
MOV 2° SP), RO 
TST -(RO) 
MOVB CRO),RO 
ASL RO 
MOV $ TRPAD( RO), RO 
RTS RO 


3: SAVE 


RO 
7;GET TRAP ADDRESS 
BY 2 


; ;BACKUP 

;;GET RIGHT BYTE OF TRAP 
: sPOSITION FOR INDEXING 
;: INDEX TO TABLE 

3:;GO TO ROUTINE 


;sTHIS IS USE TO HANDLE THE “GETPRI” MACRO 


STRAP2: MOV (SP), -C SP) 


000002 MOV 4(SP),2¢SP) 
RTI 
SNOTRAP : TYPE MSGOO6 
SHALT2: HALT 


;:MOVE THE PC DOWN 
::MOVE THE PSW DOWN 
; RESTORE THE PSw 


; UNDEFINED TRAP INSTRUCTION 


7 42 A 
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TRAP TABLE 


o .SBTTL TRAP TABLE 

1 

15476 ;@THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 

15477 BY THE “TRAP” INSTRUCTION. 

15478 

15479 ; ROUT INE 

15480 ; ...,. *eenene 

15481 063254 063234 $TRPAD: .WORD sTRAP2 

154862 063256 053430 $TYPE ;CALL©TYPEIT TRAP +1(104401) TTY TYPEQUT ROUTINE 

15483 063260 060346 $TYPOC ;CALL<TYPOC TRAP +2( 104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
15484 063262 060322 $TYPOS ;CALL=TYPOS TRAP+3( 104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
15485 063264 063246 SNOTRAP;$TYPON ;CALL=TYPON TRAP +4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
15486 063266 060550 $TYPOS ;CALL=TYPDS TRAP +5( 194405) TYPE DECIMAL NUMBER (WITH SIGN) 
13487 063270 063246 SNOTRAP; $TYPBN ;CALL=TYPBN TRAP +6( 104406) TYPE BINARY (ASCII) NUMBER 
1 

15489 063272 061150 $GTSWR ;CALL=GISWR TRAP+7(104407) GET SOFT-SWR SETTING 

sseee 063274 060774 sCKSWR ;CALL©CKSWR TRAP +10( 104410) TEST FOR CHANGE IN SOFT-SwR 

1 

15492 063276 061514 $RDCHR ;CALL=ROCHR TRAP +11(104411) TTY TYPEIN CHARACTER ROUTINE 

15493 063300 061644 $ROLIN ;CALL=RDLIN TRAP +12(104412) TTY TYPEIN STRING ROUTINE 

15494 063302 062230 $RDOCT ;CALL»RDOCT TRAP +13( 104413) READ AN OCTAL NUMBER FROM ITY 
13099 063304 062400 $RDDEC ;CALL«RDDEC TRAP +14( 104414) READ A DECIMAL NUMBER FROM ITY 
15497 063306 062566 SSAVREG ;CALL=SAVREG TRAP +15( 104415) SAVE RO-RS ROUTINE 

13088 063310 062624 SRESREG ; CALL “RESREG TRAP + 16( 104406) RESTORE RO-R5 ROUTINE 

15500 063312 040220 SKERNEL ;CALL*KERNEL TRAP+-17(104417) ENTER KERNEL MODE 

15501 063314 040230 SENERGIZE ; CALL “ENERGIZE TRAP +20( 104420) TURN ON MEMORY MANAGEMENT & TRAPS 
13302 063316 040240 SDEENERGI ; CALL =DEENERGITRAP+21( 104421) TURN OFF MEMORY MENAGEMENT € TRAPS 
13308 063320 042436 $KMAP ; CALL =KMAP TRAP +22( 104422) MAP KERNEL 1 TO 1 

15506 063322 040250 $CACHN ;CALL*CACHON TRAP +23( 104423) TURN CACHE ON 

13307 063324 040274 SCACHF ;CALL*CACHOFF $TRAP+24(104424) TURN CACHE OFF 

15509 063326 040312 SLOADC ;CALL*LOADCSR TRAP+25( 104425) LOAD CORRECT CSR 

13510 063330 040406 CALL°READCSR TRAP+26(104426) READ CORRECT CSR 

15512 063332 053764 TRAP +27( 104427) PROGRAM DETECTED ERROR 

15513 063334 12 TRAP » 30( 104430) PROGRAM 

15514 063336 TRAP «31( 104431) 

15515 063340 054070 32) 





36) 

15520 063352 054266 TRAP +37( 104437) 
15521 0633554 TRAP +40( 104440 ) 
1 063356 054330 TRAP +41( 104441) 
054352 TRAP ¢42( 104442 ) 

15524 063362 054372 TRAP +43( 104443) 
15525 063364 054410 TRAP +44( 104444 ) 
15526 063366 TRAP +45( 104445 ) 
15527 063370 TRAP +46( 104446 ) 
15528 063372 TRAP +47( 104447) 





iS PER24 PERR24 TRAP + 50( 104450 ) 
15530 063376 051240 $PER25 iCALL =PERR2S TRAP +51( 104451) PROGRAM DETECTED ERROR 


ai 
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TRAP TABLE 
155351 063400 054672 SPERE TRAP +520 104452) PROGRAM DETECTED ERROR 





15532 063402 054712 $PER27 TRAP +53( 1044535) PROGRAM DETECTED ERROR 

15535 063404 051466 sPERSO TRAP +54( 104454) PROGRAM DETECTED ERROR 

155354 055102 sPERS1 TRAP +S5( 104455) PROGRAM DETECTED ERROR 

15555 063410 05 sPERS2 TRAP +S6( 104456) PROGRAM DETECTED ERROR 

15536 os SPERSS TRAP +S7( 104457) PROGRAM DETECTED ERROR 

15537 063414 055326 sPERS4 TRAP +60( 104460) PROGRAM DETECTED ERROR 

15536 063416 055360 $PERSS TRAP +61( 104461) PROGRAM DETECTED ERROR 

15539 055414 SPERSE TRAP +62( 104462) PROGRAM DETECTED ERROR 

s 06 SNOTRAP TRAP +63( 104463) PROGRAM DETECTED ERROR 

15541 063424 063246 SNOTRAP TRAP +64( 104464) PROGRAM DETECTED ERROR 

15542 063426 063246 SNOTRAP TRAP +65( 104465) PROGRAM DETECTED ERROR 

155435 063430 063246 SNOTRAP TRAP +66( 104466) PROGRAM DETECTED ERROR 

a eaes 063432 063246 SNOTRAP TRAP +67( 104467) PROGRAM DETECTED ERROR 

15546 063434 0406352 sECCOIS ;CALL-ECCOIS TRAP +700 104470) DISABLE ECC ON ALL CSR’'S 

15547 063436 040646 sECC10IS CALL =ECC10IS TRAP +71(0104471) DISABLE ECC ON 1 SELECTED CSR 

15548 063440 040660 SECCINIT;CALL*ECCINIT TRAP+72(104472) INITIALIZE ALL MK11 CSR'S 

15549 063442 040674 SECCLINIT;CALL“ECCLINIT TRAP+73( 1044735) INITIALIZE 1 SELECTED MK11 CSR 
sCBCSR_ ;CALL-CBCSR TRAP + 74( 104474) WRITE GENERATED CHECKBITS IN ALL CSR'S 


TRAP + 75( 104475) WRITE 7 one ge ah IN 1 SELECTED CSR 
TRAP + 76( 104476) WAS THERE A SBE ON ANY CSR? 





15553 063452 041112 TRAP +77( 104477) WAS THERE SBE ON 1 SELECTED CSR? 
15554 041142 A OBE ON ANY CSR? 
15555 063456 04 A OBE ON 1 SELECTED CSR? 
5 063460 941306 
15557 063462 041320 SR 
063464 0413350 S ;CALL=CHKDIS E CKBITS FROM ALL CSR’S 
15559 063466 041344 SCHR LOTS /CALL -CHKADIS € CKBITS FROM 1C 
15560 063470 040706 SENASBE ; *ENASBE SBE‘'S FROM ALL CSR'S 
15561 063472 040722 SENA1SBE ; CALL “ENA1 SBE ENABLE TRAPS oF FROM 1 SELECTED CSR 
, 15562 063474 040426 $STSTRD ;CALL*TSTREAD TRAP+110(C104510)TEST LOC (R1) € TST FOR SBE (WITHOUT FETCHES 
15565 063476 041424 SINV*LID;CALL=INVALID TRAP+111(104511)INVALIDATE BACKGROUND PATTERN ON BANK 
15564 063500 041454 SERRGEN ; CALL -ERRGEN TRAP +114(104512)TEST ERROR ADDRESS 
15565 063502 063246 SNOTRAP 
15566 06 063246 SNOTRAP 
15567 063 063246 SNOTRAP 
5 063510 0653246 sNOTRAP 
15569 063512 063246 sNOTRAP 
15570 063514 063246 SNOTRAP 


15571 063516 063246 sNOTRAP 


CZMSDD0 
TRAP TABLE 


15574 


Msiit &-™ OITAGNOSTIC 


177776 


= | 
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ST . 177776 


sSTATUS REGISTER 


OR em me 


st QUENTE 


448 


CZMSOD0 MS11 L/™ ts catia 


TABLE ERROR POINTE 


15630 063616 





067345 


Pili J 
MACRO M1113 14 JAN-62 16:15 PAGE 485 SEQUENCE 44% 
.SBTTL TABLE ERROR POINTER 
;*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
;¢THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
;*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 
; *NOTE1: IF SITEMB IS 0 THE ONLY PERTINENT DATA IS (ERRPC). 
; *NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


ssPOINTS TO THE ERROR MESSAGE 


;sPOINTS TO THE DATA FORMAT 


sERROR 10 


IN it 
CZMSDDO MS11-./M DIAGNOSTIC MACRO M1113 14-JAN-862 16:15 PAGE 487 
TABLE ERROR POINTER 


15633 sERROR 11 
15634 063620 5265 EM11 

15635 063622 067705 DH7 

15636 063624 064304 OT7 

15637 063626 064630 DFS 

15638 z;ERROR 12 
15639 063630 5265 —EM11 

15640 063632 067705 DH7 

15641 063634 064304 DT7 

15642 063636 064643 DF 4 

15643 sERROR 15 
15644 3640 065307 EM12 

15645 063642 070015 DH10 

15646 063644 334 DT10 

15647 063646 OF 2 

15648 ;ERROR 14 
15649 063650 065265 EM11 

15650 063652 067705 DH7 

15651 063654 064 DT7 

15652 063656 064656 OFS 

15653 3 i5 
15654 063660 5 EMi1 

15655 063662 067705 DH7 

15656 063664 064304 DT7 

15657 063666 064671 OF 6 

15656 3 16 
15659 063670 065333 EM13 

1 063672 070136 OH13 

15661 063674 064570 DT1i3 

15662 063676 064726 OF 11 

15663 3 17 
15664 063700 065365 EM14 

15665 063702 070136 OH13 

15666 063704 064370 0T13 

15667 063706 0647 OF 11 

15666 3ERROR 20 
15669 063710 065431 EnM15 

15670 063712 070136 DH13 

15671 063714 064370 oT13 

15672 063716 064726 OF 11 

15673 P 21 
15674 063720 067372 EMSS 
15675 063722 07 DH26 
15676 063724 064556 OT26 
15677 063726 OF 2 

15676 5 22 
15679 063730 065477 EM17 
15680 0637 067705 OH7 

15681 063734 064304 OT7 

15682 063736 064656 OFS 

15663 ;ERROR 23 
15684 0637 067 EmMSO 
15685 063742 070453 DH23 
15686 063744 064 DT23 
15687 063746 064737 DF 13 


——E ee C+ 


15 
iS 


40 064054 
741 06405 


MS11 ./™ DIAGNOSTIC 
ERROR POINTER 
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33 
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sO MESSAGE 


sNO MESSAGE 


£ GENCE 


ee 


TAGNO'S TIC 
ERROR POINes 





37 


41 


43 


45 


: P 49) 
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Faace ERROR POIMiER -f 


15822 ;ERROR 4” 
15825 064200 067126 E40 

i 067502 One 

15825 064204 DT20 

15826 064206 064604 OF 2 

15864 sERROR 50 
15865 064210 067415 ensé 

1 064212 070643 DH27 

15667 064214 064 OT27 


> 
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ERROR DATA TAGS (DT) 

15878 -SBTTL ERROR DATA TAGS (DT) 

15879 064220 002016 002052 0020462 0D'1 .WORD ERRPC . ADDRESS .GOOD.BAD.O 
064226 002050 

1586635 064232 002016 002034 002070 OTS: .WORD ERRPC .PADDRESS .PARCNT .O 
064240 000000 

15664 064242 002016 002032 002066 ODT4 -WORD ERRPC . ADDRESS .NEMCNT.O 
064250 000000 

15885 064252 1 177572 177574 OTS: WORD ERRPC .PPRO.-R] PPR? ORS. CPUERR.O 
064260 177576 172516 177766 

158666 064270 002016 002574 002352 ODTé: -WORD ERRPC .APTPAR,.L.SIZE ,APTECE .MSIZE .O 
064276 002376 002354 

15687 064 0020 002172 002032 ODT?7: -WORD ERRPC ,DUPPTY , ADDRESS , DUMMY .GO0D.BAD.6ADxXOR 
poey <3 002172 

15686 osane poe Sth 002172 002172 -WORD OuPpty .DUrety .OUPtty .DUrttyY 0 

15689 064534 002174 002176 002200 0710: -WORD DETRO,DETRI DE TR2.DETRS,.DETR4,.DETRS.DETSP,.DETPSW.O 
ita $ae 002206 
0643550 002210 002212 000000 

15690 064356 002016 002144 900000 ODT11: -WORD ERRPC.CSR.O 

158691 064364 002144 OTi2: . WORD . 

15692 064370 002016 002172 002032 ODT15: -WORD ERRPC DUMMY .ADORESS .DUPftY , TSTDAT, TSTDAT-2,CHECK,CSR.O 
064376 002172 002244 

0022 002144 
15693 064412 177746 177572 177574 O14: -WORD CONTRI .PPtRO PPR 1. PRO PRS, CPUERR.O 
177576 172516 177766 

15895 002054 -WORD BAD.BAD2,BADS , DUTY ,DUPttY ,O 
064452 002172 002172 900000 

15896 064460 002016 002172 000000 ODT17: -WORD ERRPC ,OUPPTY .O 

15901 pores 002016 002050 OT20: -WORD ERRPC.GOCOD.BAD.O 

15905 064476 002016 002172 000000 DT22: -WORD ERRPC .DOUPTIY.O 

15906 064 002016 0021 002042 OT23: .WORD ERRPC .OUPPtTY .GOOD. BAD, OUrttY , DUMMY . DUMMY , DUMMY ,0 
064512 002172 002172 
064520 002172 002172 0300000 

15907 064526 0020 002172 002144 OT24;: -WORD ERRPC ,OUPPTY .CSR DUMMY . DUPPTY , DUMMY , DUMMY ,0 
064534 002172 002172 002172 
064342 002172 000000 

15908 oaanes 002016 002042 002144 DT25: -WORD ERRPC,GOOD.CSR.O 

15909 064556 002016 OT26: -WORD ERRPC,.BAD,0 

15910 064 002016 002172 0020 OT27: -WORD ERRPC , DUMMY , ADORESS . DUMMY , DUMMY , DUMMY , DUMMY ,O 
064572 002172 002172 002172 


15919 


15920 


15921 


segeegg? @ 


8885 
~ 
© 


SS888888 
85 SRSESSSSSSSBSSSBSESSSoSBSSSsSsssEs sess 


S2BS88885 
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- BIN 


-8rTE 


BYTE 


-.BYTE 


-BYTE 


.BrTe 


0.5.0.8. -0.0,0, 3.6.2.4 


0.5.0.8. .0,8. 8. 3.6.2.4 


0.5,0.8..9..9..9..3.6.2,4 


0.5.0.86..9..8..8..3.6.2.4 


0.5.8..0.0.9..0.0.9..2.4 


o.5 
O,1,1,1,1 


0.5,0.8..0.0,0,0,0 


0,.5.0.0.35.6,.2.4 


0.5.0.3.6.2.4 


0,.5,0.8..3.6.4 


. 


ERROR DATA FORMATS (DF ) 
0,.0.0,0,0,0.0,.0,0,0,0,0,.0,0,.0,.9,0,0,0,0 


Gm wece 


4 : 7 
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.o 
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as a ee 5A 


ERROR MESSAGES (EM) 

MODE iN MARS, 

>) IN BANK 0/7 

/WON-EXISTANT MEMORY (HOLES) IN BANK 0” 

/TILLEGAL OR RESERVED INSTRUCTION (TRAP 10 10)/ 
CTED TRAP 10 4/ 

/MEMORY MANAGEMENT (TRAP TO 250)/ 


/MEMORY DATA ERROR/ 





ERROR OUP 
XPECTED SBE FLAG/ 
/MITE BYTE one TO CLEAR SBE 


/OE TAILED 
/MISSING E 













NOT CAUSE ABORT / 

MODE POINTER FAILURE - DID NOT PROTECT BANK/ 
/CORRECTION FAILURE WITH ECC ENABLED ON FORCED SBE/ 

/WAITE BYTE (a? WITH ECC ENABLED FAILED TO CLEAR DATA AT/<CRiF> 


TION/ 
ECC ENABLED CHANGED DATA AT FORCED OBE LOCATION’ 
CHANGED DATA AT FORCED OBE LOCATION/ 
ENABLED CHANGED DATA AT -— OBE LOCATION. 
CTION WITH ECC eines ON FORCED SBE 
S WITH PROGRAM S 


APT ng Be gy: IZING/ 
/BRANCH FAILED ys Sa cooes TEST/ 
/BAD ERROR ADORESS GENERATE 

‘SBE € OBE FLAGS “Saar” oN FORCED UNCORRECTED SBE / 





= 


JaN-82 16:15 PAGE SO 


~- 
- 
» 
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" 


SSSSESSESSESESESESSESE @ 
SSsSsEssEs: 


St ttt tit te 


ERROR DATA HEADERS (0m) 

/ °C OFV ADD GOOD BAD - 

/ PC GO-CC BD-CC/ 

/ eC 1S’ ADD @ OF ERRORS, 

‘= MRO Ri PR PRS 
/ PC APTPAR LSIZE APTECC ™SIZE/ 
—_.* BAN §6VADD PADD GOOD / 
/ BAD xOR CSR MTYP INT PATy 
/ RO Ri R2 RSs RA 
, ee CSR/ 

4 CSR’ 

. BANK VADD PADO WROTE 
/ CHKBITS CSR/ 

/CONTRL MRO wR MnRo TRE 
4 PC SANE PADD GD-wOl GD-we2 
/ BAD-WOl BAD-WO2 BAD-CHK INT PAT? 

4 PC BANK / 

4 PCs 

4/ PC BANK GO-ERR BAD-ERR CSR MTYP = PAT/ 
/ PC BANK (CSR) CSR MTYP INT PAT 
/ PC GD-DAT (CSR)/ 

4 PC BADCODE/ 

/ PC BANK VADD PADD CSR MTYP PAT, 
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CZ™SO00 MS11-i./™ DIAGNOSTIC SEQ NCE 
ME SSAGE S 

16039 .SBTTL MESSAGES 

16040 070717 200 040 1053 ™SGOO00O: .ASCIZ <CRLF>~ CZ™SDD - MS11L-™ MEMORY DIAGNOSTIC” 

16041 070764 200 040 040 ™SGOO1: .ASCIZ <CRLF>/ MEMORY CONFIGURATION MAP, 

16042 071046 200 040 040 mSGOO02: .ASCIZ <CRLF>/ 16" WORD BANKS 

16043 071125 200 040 040 ™SGOO5: .ASCII <CRLF>/ i Pa 37 

16044 071165 040 040 040 .ASCI / 3 5 5 > 

16045 971230 200 040 040 ™SGOO04: .ASCII <CRLF>/ 0123456 70123456 701234567 ” 

16046 071271 060 061 062 .ASCIZ FE eee ae OLE ase POLES OL ES/ 

16047 0713536 200 105 i22 ™SGO0S: .ASCIZ F> Ss 

16046 071350 200 125 116 ™SGOO06: .ASC “CRLF > /UNDEF INED TRAP INSTRUCTION/< 32> 

16049 071405 200 113 ™SGOO <CRLF>/INTRLV 7 ; INTERLEAVED CSR e 

16050 071417 200 103 <CRLF>/CPU MAP ;CPy ~ ae BANE 

16051 071431 200 115 <CRLF >/MEMTYPE / sMEMORY TYPE 

16052 071443 200 120 <CRLF>/PROTECT / :sMEMORY PROTECTED 

160535 071455 040 040 / 0 1 < 3 4 5 6/ 

16054 071543 064 065 1436 70123456 70123456 7012 3456 70123456 70123456 7012 3456 70123456" / 

16055 071640 1350 000 4%/ 

1 071642 040 000 4s 3 SPACE 

16057 071644 000 000 0,0 sFOR SINGLE ASCII CHARACTERS €& TERMINATOR 

16056 071646 200 103 <CRLF>/CSR / 

16059 071660 040 040 / / 

16060 071671 040 040 eo # 

16061 071674 040 040 / 4 

1 071700 200 106 i123 <CRLF>/FS COMMAND 

16063 071721 200 103 117 CRLF >/COMMANDS AVAILABLE: / 

16064 071745 200 060 040 «= EXIT/ 

16065 071 200 061 040 * 

16066 071773 200 062 040 “ 

16067 072010 200 063 040 ° 

16068 072033 200 O64 040 * 

16069 072055 200 065 040 . 

16070 072107 200 066 040 ° IG / 

16071 072133 200 067 040 * $0B-A-LONG ll 

16072 072157 200 070 040 * ERROR 

16073 072201 200 O71 075 <CRLF >/9= ox; TEST’. 

16074 072221 200 061 060 <CRLF>/10- SET 

16075 072244 200 061 061 <CALF>/il= ENTER KAMIKAZE 

16076 072274 200 061 062 <CRLF>/12=° EXIT KAMIKAZE MODE / 

16077 072323 200 061 063 «CRLF >/13- TURN CACHE 

16078 072346 200 061 O64 CACHE 

16063 072370 200 061 065 <CRLF>/15= TEST SELECTED BANKS/ 

160864 072420 200 061 066 ALL 

160865 072443 200 061 067 

16066 072464 200 061 070 

16067 072506 015 012 000 

160866 072511 200 127 110 ofa F SMTCH yy gull / 

160869 072533 200 103 i123 <CRLF>/CSR WORD? 

16090 072547 200 103 123 <CRLF>/CSR DOES NOT EXIST/ 

16091 072573 200 103 117 :/ 

16092 072605 200 117 114 

16093 072622 200 103 i235 

16094 072636 200 105 130 

16095 072656 200 102 101 »? # 

16096 072675 200 120 110 <CRLF > /PHYSICAL ae + ol 17757776)? / 

16097 072735 200 120 101 <CRLF>/PARITY ABORT/<32> 

16098 072754 200 124 111 <CRLF>/TIMEQUT TRAP/<32> 

16099 072773 200 102 131 <CRLF > /BYPASSING ECC LOGIC TESTS ON BANK / 


CZMSDODO S11 ./M DIAGNOSTIC 


MESSAGE S 


073037 


040 
i21i 


S8sssesssssssssesssss 


SSSSsessssenssssssssss 


poe 
rope 
im Us 


“MACRO 1115 





14 JAN-82 16:15 PAGE SO3-1 


‘oe TO LACK OF SBE FREE LOCATIONS’ 
/ 
<CRLF>/MODIFY MEMORY / 


<CRLF >/INPUT NEW DATA? / 

<CRLF>/SELECT BANK € PATTERN TEST’ 

<CRLF >/BANK NOT ACCESSABLE / 

<CRLF >/PATTERN(O-35)? / 

<CRLF >/PATTERN O DATA 1s? / 

<CRLF>/TO ESCAPE TYPE ANY KEY/<CRLF ><12><12> 
<CRLF>/TEST COMPLETE/ 

/ WOT AVAILABLE NOW - TRY LATER! / 





<CRLF>/WRITING € pene ADORE SS PATTERN AS BACKGROUND 
<CRLF >/POWER RECOVERY/ 

ee S. eee POWER FOR/ 

4 SECONDS MAX 

<CRLF > /NOW STARTING READ TEST OF MEMORY BANKS/ 

<CRLF >/SOB-A-LONG TEST/ 

<CRLF>/BELL = EACH wes pomere/ 

<CRLF>/ CSR CSR 

4227222727 

/INPUT MuST 









COUNT EXCEEDED 20 - ABORTING FOR XXDP CHAIN/ 


,~ WORDS OF MEMORY TOTAL /<CRLF > 
7K OF BIPOLAR/<CRLF > 

‘kK OF MF11S-K/<CRLF> 

<CRLF > /REFRESH 


SH TEST/ 
<CRLF > /RELOCATION NOT POSSIBLE /<S2> 
<CRLF>/ BANK —_ <CRLF 
<CRLF>/END PASS @ 
/ ERROAR(S) DETECTED/<CRLF > 
FTL ‘es —" / 













4 PAT#=/ 

<CRLF >/ENTERING KAMIKAZE MODE / 

<CRLF >/LEAVING KAMIKAZE MODE / 

<CRLF >/LEAVING FS MODE/<CRLF > con 
; 


32,0 ROL Z 

<CRLF >/ENTER BANKS IN OCTAL - USE NUMBER OUTSIDE RANGE TO TERMINATE (177)/ 
<CRLF>/CACHE I 

<CRLF > /CACHE 1s +4 CEXCEPT DURING ACTUAL PATTERNS )/ 

<CRLF>/OMLY SELECTED BANKS WILL BE TESTED, 

<CRLF>/ALL BANKS WILL BE TESTED/ 

/K OF MS11-L/<CRLF> 

/K OF MS11-M/<CRLF > 


INA ¢ 
A a y+ = Pima L/™ DIAGNOSTIC MACRO M1113 14-JAN-62 16:15 PAGE 503-2 SEQUENCE 


16181 075231 113 040 117 ™SG114: .ASCIZ OF UNIBUS PARITY/<CRLF > 

161862 075255 200 040 040 ™SG116: .ASCIZ <CRLF >" 11/34 

161835 075267 200 040 040 SG117: .ASCIZ <CRLF>” 11744” 

16164 0753501 200 040 040 SG116: .ASCIZ <CRLF>”“ 11/760” 

16165 075315 200 040 040 ™SG119: .ASCIZ <CRLF>/ NO/ 

16186 075322 040 103 101 M™SG120: .ASCIZ , CACHE AVAILABLE / 

161867 075343 040 103 101 M™SGi21: .ASCIZ / CACHE BYPASSED/ 

16188 0753635 200 103 125 MSGi22: .ASCII _—oo NUMBER / 

16169 075377 000 MSGA122: .BYTE 

16190 0 040 103 117 -ASCIZ ? CONTROLS TOO MANY SAOKS/ 

16191 0754351 200 120 122 M™SGi25: .ASCIZ <CRLF>/PROGRAM RELOCATED - ECC . —s 
16192 075502 200 116 125 MSG124: .ASCIZ <CRLF>/NUMBER OF CSR‘S IS “WRONG IN 

16193 075545 040 120 101 M™SG125: .ASCIZ / PASSES COMPLETED/ 

16194 075567 200 120 122 ™SG126: .ASCIZ <CRLF>/PROGRAM CSR COULD NOT BE DETERMINED/ 
16195 0 200 124 122 MSG127: .ASCIZ <CRLF>/TRACE ENABLED/ 

16196 075653 200 124 122 ™SG126: .ASCIZ <CRLF>/TRACE DISABLED/ 

16197 .EVEN 

6203 075674 $ SEND 

16204 075674 END: 

16205 075674 004014 -PRINT 60000-SUPLIMIT ;SUPERVISOR ADDRESSES LEFT 
16217 075674 002104 -PRINT 100000-END ;ADDRESSES LEFT IN 16K 


16221 000200 -END STARTS 


CZMSODO MS1i ./M OIAGNOSTIC 
SYMBOL TABLE 


ABORTF 002140 81 011734 

L 002114 810 014622 
ACTFLA 002322 811 016240 
ADDRES 0020 Bi2 016506 
ANA2 007170 613 016514 
APTOOW 04 814 016532 
APTECC 002376 615 016574 
APTFLA 002324 616 016646 
APTHAN 014556 617 022042 
APTHM.T 045 012514 
APTPAR 0023574 620 022302 
APTSIZ 002416 821 024322 
BACK 056014 B22 024326 
BACKGN 036532 825 024526 


BADPSW 002030 B26 034452 
4 B27 034510 
BADSTA 040170 83 012556 
XOR 002056 830 034524 
BAD2 002052 631 34644 
002054 035024 
BAFPAF 014712 833 035046 
BAFPAR O1 036242 
BAKPAT 002574 835 041010 
“Ane 002100 336 041014 
BANKIN 002102 837 041154 
043752 B4 013360 
BANKOK 044752 041160 
BAWPAF 015126 641 2 
BAWP 01 B42 041370 
BGTEST 036110 B43 72 
BITO = 000001 042600 
BITL = 900002 B45 042730 
BIT10 = 002000 B46 042744 
BITi1l = 004000 847 050014 
BIT12 = 010000 85 013522 
BIT13 = 020000 050236 
BIT14 = 040000 651 050512 
BITi1S = 100000 051006 
BIT2 = 000004 653 051006 
BITS = 000010 854 051104 
BIT4 -« 855 
BITS -« 856 
BIT6é * 000100 657 
BIT? = B6 013564 
BIT6 « 052354 
BITS «= 001000 861 057766 
057772 
863 060070 
B64 060162 
865 
87 014050 





CACHON= 104423 


MACRO M1113 14 JAN-82 16:15 PAGE SO3-3 





177754 


blac 
CZMSODO MS11-./M DIAGNOSTIC MACRO M1113 14-JAN-82 16:15 PAGE SO3-4 
SYMBOL TABLE 


ENASBE= 104506 
ENA1SB6* 104507 
ENO 075674 


EXCMD4 046712 
ExIT 045136 
= 045142 
€1 012152 
E10 014710 
E11 01 

El2 017032 
E15 017016 
E14 16 
E15 6 
E16 016722 
E17 21 
E2 012716 
E20 022 
E21 024504 
E22 024470 
E2 024712 


E25 025110 
035016 
E27 035002 
ES 012702 
E30 034616 
E31 034766 
E32 035042 
E35 035066 
E34 036364 
ESS 041062 
E36 041062 
E37 1226 
E4 013514 
E40 O04 
E41 041420 
42 041420 





LKS = 177546 Lis 
LOADBA 002404 L150 
LOADCS= 104425 L151 
LOADER= 000043 Lise 
LOADHO 002540 L153 
LOOP 014212 L154 
OWMAP 043706 L155 
LSIZE 002352 L156 
L * 000037 L157 
LWSBE = 000035 L16 
LO 004566 L160 
Li 004630 L161 
L10 005126 L162 
L100 014212 L163 
L101 014326 L164 
L102 014426 L165 
L105 014436 L166 
L104 014606 L167 
L105 014606 L17 
L106 014674 L170 
L107 015006 L171 
Lil 134 Live 
L110 015114 L173 
Lill 01 L174 
Lile2 015374 L175 
L113 015524 L176 
L114 015676 L177 
L115 016026 Le 
L116 016200 L20 
L117 016260 L200 
Lie 005164 L201 
L120 016316 L202 
L121 016326 L203 
Li22 016752 L204 
L123 016734 L205 
L124 017000 L206 
L125 017242 L207 
L126 017352 Lei 
Lle7 017510 L210 
L135 16 L211 
L130 017536 L2le 
L131 017542 L213 
L132 017544 L214 
L135 017610 L215 
L134 017644 L216 
L135 017650 L217 
L136 017652 L22 
L137 L220 
L14 005416 L221 
L140 020474 L222 
L141 021342 L225 
Lié2 021352 L224 
L143 0213552 L225 
L144 021410 L226 
L145 021420 L227 
L146 021420 Les 
L147 021450 L230 


ae ee. re ee ee +e ee ee a ee ee 


010722 
021454 


CZMSDDO MS11-./™ DIAGNOSTIC 


SYMBOL TABLE 
L231 025754 
L232 026244 
L233 026302 
L234 026402 
L235 026454 
L236 026462 
L237 026466 
L24 011672 
L240 030304 
L241 030302 
L242 030304 
L243 031732 
L244 034474 
L245 034504 
L246 034616 
L247 034 
L25 011706 
L250 034 
L251 034576 
L2s2 0 

L253 034630 
L254 034766 
L255 0 

L256 034700 
L257 0347352 
L26 012136 
L260 034716 
L261 034730 
L262 0347 
L263 034742 
L264 034754 
L265 03 
L266 0367 
L267 037372 
L27 012136 
L270 37560 
L271 037662 
L272 74 
L275 

L274 041040 
L275 041040 
L276 0411 
L277 041110 
L3 7 
30 012136 
L300 041204 
L301 041204 
L302 041246 
L303 041254 
L304 041376 
L305 

L306 

L307 042572 
31 012014 
L310 042572 
L311 04267 
LSle 042724 
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071125 


074125 


B)2 
Ja 
CZMSDO00 S11 i. /™ DIAGNOSTIC “ACRO M1115 14 JAN-8? 16:15 PAGE 503-4 SEO a wee 4 
SY™BG. TABLE 





75255 
116 075301 


yoRERES 
: 


es 
~% 
~ 
: 
> 


003642 SBEN 
075545 MTPOSO PERR26 017114 
SCOPE = 000004 


172260 
172272 
172274 
172276 
002544 


sesssesseed 








z 
5 


= 
2 





oot ee 





aad; 


+ 
— «. 


&EBROO rat L/™ DIAGNOSTIC MACRO MLIIL® 14 JAN-82 16:15 PAGE 503.7 DANCE 





SKIP 002514 Su’ == 000200 sis * 900001 
J 055524 Swe 0+ 000600 SKERNE 040220 
002064 Sw9 = =~ 001000 SKMAP 8 042436 
043144 SYSSIZ 003722 s*s == 000061 
013142 TAG26 4 8=6—011202 su = 000066 
002534 TAGS$ § §=©011256 LF 002625 
000056 TAG4S sil * 000064 
002562 TAG70$ 057202 SLOADC 040312 
002274 TAG71$ O57212 SLPADR 002564 
002234 TAG7T2$ O57 SLPERR 002566 
TAG73S$ 057272 $.$ + Q00000 
* 177776 TAG74$6 057332 SMADRi 06351350 
TAG7S$ 057344 SMADR2 065134 
003632 TAG76$ 057356 SMADRS 063140 
000 300 TAG77$ 057422 SMADR4 063144 
000310 TAG76$ 057430 SMAIL 065076 
TAG79$ SMAMS1 063126 
024314 TAGS$ § §=0110350 SMAMS2 063152 
002372 TBG45 7 SMAMSS 063136 
TCFIG1 7 SMAMS4 063142 
TCFIG2 037410 SMBADR 063200 
004736 TCFIGS 037576 SMNEW 86062216 
011606 TCOMFI 037134 8MSGAD 063112 
013322 TEP 002406 SMSGLG 065114 
TEST 006044 SMSGTY 063076 
010540 TESTAD 002364 $ 062 
TESTMO SMTYP1 063127 
TIME 002312 sHTvP2 06351355 
T 040152 sMTYPS 063137 
SUPDO2 026502 TKVEC = 000060 SMTYP4 063145 
SUPDOS 002132 SNOTRA 06 
SUPDO4 T 002 SMALL 0025350 
SUPDRO 002154 TOTCSR 002220 SNWTST= 000001 
SUPOR1 002156 006140 SOCNT #060544 
SUPDR2 * 0000 sOCTVL 063060 
SUPDRS 002162 TSTBAN 011450 sOCTS = 063064 
SUPDR4 002164 TSTOAT 8s OMODE 
SUPORS 166 TSTRO1 sOVER 055714 
SUPOR6 002170 TSTREA= 106510 sos Ses 
SUPLIM 0535764 TST1 8PASS 065104 
SUPSTK* 000740 TST2 i sPASTM 
SWAPAT 002576 TST3 010730 SPATMA 002010 
a lb TST4 011716 SPERO1 055764 
SWREG » 000176 TSTS 01 SPERO2 054012 
Swo-le i TST6 014264 sPEROS 
Swi ss TYPDS = 104405 SPEROS 054070 
SW10 += 002000 TYPEIT= 104401 SPERO? 054152 
SWil »* 004000 TYPOC - 104402 SPERIO 054174 
SWi2 + 910000 TYPOS = 104405 SPER11 054224 
SW13 + 020000 TYPSO » 000000 SPERI2 054244 
Swi4 + 040000 TYPS1 = G00002 SPERI5 2954266 
SWwiS + 100000 TYPS2 * 900000 SPERI4 054 
Sw2 TYPSS = 000000 SPER1S 054330 
SWS = = 000010 TYPS4 = 000000 SPER16 0545 
Su4 = *-« G00020 TYPSS = 000000 SPER17 054372 
SWS = «000040 TYPS6 + 000002 SPER20 054410 
SW6 0S = 000100 T12Aa 033250 SPER21 054426 


: al 
- 


“ACRO “LIIS 14 J8N-62 16:15 PAGE SOS 8 EGANCE US 


erEROO 1} L/M DIAGNOSTIC 











SPER22 054446 te4S 002621 sSuR =—6= 165000 STSTRD 040426 
SPER2S 054464 tin a?7?77 SSWREG 065120 STTYIN 062142 
SPER24 054502 062662 $7 = 000656 sTYPDS 060550 
SPER2S 051240 061514 STES™TN 063102 sTYPE 0534350 
SPER26 054672 sTKB 002606 STYPEC 055556 
SPER27 054712 sTKS 002604 STYPEX 0535744 
SPERSO 051466 s™N = 8=0(* 900007 sTYPOC 060 
$PERS1 055102 sTPB 0026i2 STYPON 060 
sPERS2 sTPF.LG 02352 sTYPOS 060322 
sPERSS sTPS 002610 $Ti 

SPERS4 055526 STRAP 0632 sto 000455 
SPERSS 055360 STRAP2 065234 SUNIT 065110 
SPERS6 055414 STRPAD 063254 SUNITM 06 
SPWRDNM 051654 sTSTM 063202 suUSWR =—s« OH 122 
sPURLP 380052210 

- ABS. 075674 00” 





000000 001 
ERRORS DETECTED: O 


VIRTUAL MEMORY USED: 26160 WORDS ( 103 PAGES) 

DYNAMIC MEMORY: 20034 WORDS ( 77 PAGES) 

ELAPSED TIME: 02:36:36 

CZ™SO00 ..BIN,CZMSOO. SEG/CR/ -SP/NL : TOC *CZMSDD.SML ..CZMSDO.P11 





CREATED BF 


MACRO OW | 


371- -11727 373- 11733 


3735-11736 





4359-14065 
190-7192 
23 -8392 
214-7745 
232 -8320 
#266 -9112 
276-9585 
#406 -12739 
0436 -13971 
0436-14015 
e436 - 14058 
495 -15910 
223 -8011 
4511-14378 
232-8263 
22 2408-12742 
043% - 14003 
-14044 2436-14049 
2445 - 14167 2445-14194 
4439-14078 441-14069 
324-10602 €324-10611 
445-14165 445-14176 
166-6193 166- 
#170-6375 170-6375 
2188-7162 1886-7162 
0204-7446 206-7514 
227-613 230- 
236-6412 2236-8419 
240-6498 242-8527 
O6 0346-11116 3486-11116 
3571-11691 «3571-11696 
e373-11742 5373-11745 3573-11751 


439 - 14066 
192 - 7222 
2% -8421 


225-8005 
246 -6675 


2268 -9188 

#302 - 10045 
e406 -12739 
©43%6 -13976 
e436 -140186 
443-14129 


225 -8025 


244 - 8657 
#406 -12754 
04% - 14008 
0438 - 14054 

495 -158679 


443-14136 


406 -12707 
445 - 14166 


166-6219 
170-6377 


244 1 

350-11210 
@371-11700 
#373-11779 


4359-14077 
94 - 7252 
238 - 6464 


0445-14157 


223 -8034 


495 - 15887 
445 -14156 


436 - 13986 


246 - 8681 

3500-11211 
371-11703 
375-11785 


225 - 8045 


#314 -10310 
36 - 13966 


445 -14165 


439 - 14066 


167 -6305 


250 -8714 
¢350-11215 
371-11712 
e375-11790 


CREATED 6 
CROSS REFERENCE 
VALUE 


“ACRO ON 14.AN-82 AT ; 


164- 
#310-10166 
111-4178 

163-6063 


526 - 10626 
3335-10770 
















331 -10740 
272-9315 
bb) 


155 - 
3735-11647 
157-5658 











244 -6641 
3548-11115 


356 - 11423 
156 -5680 


179-6921 
331. 10745 


266 -9141 
5346-11161 


163-6070 


3735-11849 «375-11903 
380 - ghee e380 -11970 


350 -11215 


156 -5696 
312 - 10262 
3331-10723 
335 - 108607 
371-21706 


158 -5696 
320 - 10438 
337 -10831 


276-9519 
6850 


272-9310 
3350-11216 


248-6705 


-106 
166-7155 
5348-11131 


266 -9132 
3536-11417 
471-15088 
3356-11411 
219-7922 
230-8247 
244 -8625 


3862-12017 
4117-12996 
470-15016 
208 - 7520 
350-11217 


163-6016 
318 - 10396 
3331-10727 
3335-10615 
3573-11747 


159-5761 
320 - 10476 
337 -10836 


3350-11223 


293 - 9686 
$56 -11429 


163-6031 
329 - 10709 
352-11285 


158 -5694 
331-10745 
24 
33353-10759 
3486-11172 
356 - 11365 
272-9299 
3375-11835 


219-7948 
230-8251 
314-10325 


04 
2 
e3 


3735-11904 
3860-11971 
#362 - 12024 
17-13009 
23-8015 
56 -11364 


163-6037 

3520-10478 
331-107351 
335-10817 
4435-14118 


159-5774 
320 - 10505 
356 - 11388 


3356-11435 
179-6923 


157-5668 
276-9516 
350 -11241 


293 - 9689 
385 - 12091 
163-6057 
335 -10794 
352-113501 


159-5765 


333- 10779 
3486-11180 


3375-11836 
274-9407 
3786-11935 


219-7966 
230-6254 
329 - 10695 


3786-11920 
3560-11978 


382 - 12025 
4453-14115 
227-8076 


163 -6047 

320 - 10484 
331-10735 
3486-11127 
447 -14225 


165 -5966 
331-10715 


223-8016 


350- 11254 


3529-10709 
38685-12107 


391 - 12126 


163-5968 
3357-10836 


1635-6031 
445-14177 
3530-11236 
5375-11699 
276-9505 
382 - 12006 


228 -8162 
232-8305 


0364-11557 





CREATED Br MACRO ON 14 JAN 62 AT 
CROSS REFERENCE 
VALUE RE* ERENCES 
045342 0364 -11562 
045556 219-7925 219-7924 
-6594 5346-11168 
002126 01359-5045 194-7254 
e356 - 114286 
045050 0360-11475 4686-14965 
045074 3560-11465 360-114866 
036112 #310-101869 3510-10195 
002 0159-5116 ©1861-6955 
161 - 7004 
002522 141-5200 2145-5516 
002516 #141-5199 2145-5320 
5367-11639 367-1 
414-12935 419-13071 
CACMOF + 104424 #110-4055 154-5522 
169-6336 206-7557 
CACHON + 1046425 110-4054 147-5595 
166-6274 170-6365 
410-12779 
* 000114 111-4195 111-4194 





. 
: 
~ 
b 
> 
~ 
~ 
o 
é 


170-6363 


163-5976 


#171 -6447 





7:3} PAGE $ 
SEQUENCE 369 
CREF vol 
219-7949 219-7969 
350-11227 352-11286 
196-7291 200-7370 
4711-15092 

#360 - 11490 
310-1022” 

181-6976 4181-6965 
5326-10646 5367-11641 
154-5523 «154-5523 
35367-11644 3864-12055 
419-13131 
159-5742 163-5955 
210-7626 248-8705 
160 -5661 163-6125 
206-7569 210-7678 

- 268-9175 
#266 -9139 

#276 -9514 

274 -9355 
171-6416 

4668-14950 0466-14979 
4550-14304 451-14367 
160-5654 0214-7733 

161-5875 

~ 163-6115 

210-7662 226- 
270-9237 270-9251 
276-9528 278-9570 

@375-118696 

163-6085 +166-6260 

2154-5494 0154-5495 

#163-6023 163 -6024 
163-6050 «163-6050 

®166-6259 +166-6261 

171-6446 179-6836 





232-8304 


3S2 - 11302 


204 - 7455 


#181 -6966 


2154-5524 


e384 - 12055 


164-6147 
250 -8742 
164-6131 
210- 7686 


270-9268 
#272 -9304 
#260 - 9612 

276-9454 


171-6426 
236 - 8360 


171-6398 
266 


270-9270 
280 -9630 


*.66 -6279 


163-5959 
163-6024 
163-6051 
#166 -6276 
179-6844 


232 -8305 


234 -8360 


234-8362 


0364-11566 415-12959 415-12962 
3468-11105 ©356-11379 ¢356-11406 «3546-11425 


#161 -6967 
326 - 10636 
e384 - 12056 
166 -6209 
292 - 9850 
164 -6150 
248 -8707 


274-9367 
272-9306 
#280 -9614 

278-9554 

406 -12710 


256 -8475 
171-6411 


266 - 9090 
272-9321 
300 - 10007 


179-6866 
#163 -6007 


181-6966 


326 - 10638 
384 - 12061 


166 -6226 
365 - 11592 
166 -6217 
250 -6744 


276-9467 
e272-%.38 
#260 - 9616 


30C -9972 


181 -6989 


326 - 10643 
e384 - 12061 


166 -6245 
384 - 12054 
166 -6250 
292 - 9628 


2786-9566 
0274 -9412 
331-10739 


@342 - 10920 


240 - 8500 


161 - 7002 
365 -11586 
4100-12776 


384 - 


302 - 10032 
274-9414 
3331-10744 


3375-11856 ©@376-11927 #382-11998 


171-6421 
266 -9105 
274-9349 
312-10260 


179-6948 
163-6011 


6052 
167-6310 
179-6851 


171-6430 
266 -9149 
274-9371 
406 -12716 


163-6014 


171-6444 
268 - 9156 
274-9429 


©1635-6018 





CSR 


CREATED 6 
CROSS REF ERENCE 
vai Ut 


002144 





—ACRO ON i4 


aN 8) aT 





0139- $152 
#139-5097 


4419-13122 
4419-15051 
503 - 16049 


17:31 


179-6925 


154 - -5505 
367 - 11646 


4700-15034 
470-15036 
419-15116 
- 14934 
292 - 9832 
293-9855 
447 -14220 
2450-14331 
164 -6159 


151-5461 
0373-11780 


499 -15975 
503 - 16050 


208 - 
2206 - 7535 


266 - 968 
@331-10715 
0331-10745 

340 - 10884 
#463 - 14685 
0159-5766 


His 


PAGE 4 
SEQUENCE 370 
CREF 


voi 
161-6956 


0443 - 14118 
2192-7233 


154-5515 
410-12778 





161-5691 
0447-14253 


163-5971 
#340 - 10893 


#206 - 7584 
206 - 7546 
208 - 7537 


1861-6959 
206 - 7532 
320 - 104 


©443-14119 
#194 -7265 


#154 -5516 
414 -12935 


#292 -9635 

0451 - 14399 

0451-14598 
166 -6262 


#164 -6160 
0451-14377 


#208 - 7581 


161-6960 161-696) 


227-8108 
320 - 1044 


©1986-7336 


154-5519 
#419-13133 


154-5517 
419-13073 


292-9834 2292-9841 


455 - 14491 
161-6958 181-6992 
5367-11658 


#166 -6220 
#461-14659 495-15885 





0331 - 10725 
33353-10779 
#406 -12709 
495 -15891 
159-5771 159-5773 
163-6063 4163-6068 
#340 - 10895 


335- 10794 


2086 - 7581 


181 -6967 


3356-11414 
3735-11847 


#200- 7376 


#326 - 10638 
495 -158693 


#292 - 9848 


320 - 10465 


#367-11662 
495 - 158695 


3503-16184 


171-6415 
326 - 10665 
#331-10731 


95 
160-5611 
1635-6069 


161-6974 


293-9855 


$48-11129 
#369 -11674 


503 - 16047 
503 - 16064 
3503-16073 
503 - 16086 
503 - 16096 
3503-16107 
3503-16116 
503 -16131 
5035-16152 


$03-16172 
503-16185 


171-6425 

#328 -10675 
@331-10735 
@337-10622 
#413-128690 
495 - 15908 


160 -5821 
163-6070 


CZS00 CRe ATED Bt MACRO ON 14.J8N-62 AT 47:51 PAGE 5 
SEQUENCE 371 
STMBOL CROSS REFERENCE CREF 8 vOl 
S’Y*BOL «(VALUE REF ERENCES 
CSRINF 0024 54 #159-5146 157-5649 «157-5650 157-5656 +°157-5661 ©1586-5679 158-5660 158-5682 «158-5688 
156 -5690 156 -5696 156-5696 158-5700 ©1586-5702 «156-5727 «158-57% 
163-5986 165-6006 163 -6091 163-6098 179-6804 «179-6839 
179-6878 
CSRINT 0022 52 - 7565 
CSRLAS 002224 206 - 7573 
CSR Ba 0022 30 206 - 7561 
CSAL OC 002 504 206 - 7587 


#160-5605 *160-5616 +*160-S632 160-5845 4163-5947 163-5954 
169-6356 2170-6366 «208-7537 «208-7538 2227-8120 2244-8652 
328 - 10662 $29-10686 329-10688 «5333-10755 

-10600 5355-10800 «3359-10645 «3539-10851 339-108651 5340-10892 

e375-116350 5375-11655 «3775-11857 «375-11909 «391-12128 «391-12142 
4411-12626 2415-12687 ©4135-126894 413-12894 ¢414-12929 463-14670 

#463 - 14685 
331-10741 5337-10823 5337-10832 0339-10841 


214-7742 2214-7743 216-7797 2216-7796  468-14943 
260-6696 260-8699 260-8901 260-8906 260-8910 +260-8912 
260 - 8920 


CSROVUT 
Cres! 006142 
CILKVE 002142 
DATARG 


DATBUF 002236 





0276-9437 276-9442 276-9445 


270-9264 272-9264 2272-9266 
272-9316 2274-9341 «274-9342 
@274-9394 2274-9411 274-9415 

276-9449 # 276-9451 276-9459 
e276 -9515 276-9516 2276-9521 

276-9561 280-9593 «280-9595 
#280 - 9624 


OBE MS 002252 





DEENER + 104421 1 362-11531 

DE TAIL 057532 & 4462 0461-14630 

DETFLA 002214 @139-SO72 451-143574 455-14461 2461-14631 461-14632 461-14634 +463-14732 
OE TP Sw 495 - 15889 


495 - 15689 





DE TRS 

DE TSP 002210 

DET1 060222 

OF 11 064 726 467-15672 48689-15694 4869-15699 489-15714 0497-15926 

OF 15 064737 

OF 14 064747 

OF 15 064756 

OF 2 064604 485 - 15600 4865-15620 4865-15625 48685-15630 4687-15647 487-15677 4869-15704 489 15709 
4869-15719 24 491-15755 491-15607 4953-15826 0497-15916 

OFS 0646 50 46867-15637 4869-15741 491-15772 491-15777 491-15787 491-15792 491-15797 0497-15919 


CZ™S00 CREATED Br MACRO ON 14-JAN-62 AT 17:51 PAGE 
SEQUENCE 372 














S’MBOL aor REFERENCE CREF voi 

SYMBOL 

OF 4 9 0497 -15920 

OFS 064656 4867-15682 491-15782 0497-15921 

OF 6 064671 0497 - 15922 

OF 7 064 704 0497 -15923 

OF 6 064717 0497-15924 

oF 9 064721 4685-15610 0497-15925 

Omi 067445 

OM10 070015 

OM11 070113 

Ow12 070131 

Onis 070136 4887-15670 489-15692 489-15697 489-15712 0501-16016 
OM14 070233 

On15 070312 

OM16 070431 

On19 oreess 

On2 3 070453 

Om24 070532 

On25 070601 

DM26 070625 

OnM27 070643 

Ons 7525 

Ort®, 06 7561 489-15722 #501 - 16009 
Me, 06 7640 

Ow7 067705 4687-15655 4687-15680 491-15770 491-15775 491-15780 491-15785 
OIAGFL 002002 292 9846 

OISPLA 002602 414-12927 448-14282 
OISPRE + 000174 0448 - 14263 

OISPTB 014240 

OOBACK 014612 @166-7172 

OSwR . 151-5455 

OT1 

oT10 

ate 

OT13 064370 48687-15666 487-15671 4869-15693 489-15698 489-15713 0495-15892 
OT14 064412 0145-5338  489-15718 0495-15893 
OT16 0644 30 

OT17 064460 15896 

OT20 064466 

OT22 0644 76 

oT23 064504 

124 064526 7 

OT25 064 0495 - 15908 

DT26 064556 

OT27 064 

oTs 0642 

DT4 064242 15684 

OTS a 5387 4865-15614 485-15619 485-15624 4869-15723 0495-15885 
oOTé 064270 $806 0495 - 15886 


OT? 064 304 4867-15636 4867-15641 4687-15651 4687-15656 487-15661 491-15771 491-15776 4911-15781 491-15786 


CZ™S00 


ECCOIS 
ECCINI 


ECCIOI 


ECCLIN 
EMTVEC 


CREATED Br 
CROSS REFERENCE 
VAL UE 


002172 


* 104470 


104472 
104471 


MACRO 


Om 





14 


~ 
; HTETTE 


JAN -B2 AT 


491 -15796 


302-100 
210-7677 


wed 


’ 
aTtt 
£233 


+h 
t 


-9961 
503 - 16216 
155-5615 








274 -9365 


210-7685 
147-5378 
487 -15649 


170-6379 
300 - 10014 
3503-16217 
186-7154 


495 - 15907 
3735-11855 


214-7746 


302 - 10025 


495 - 15666 
495 - 158696 
495 - 15907 


3378-11925 


495 - 15686 
495 - 15905 
495 -15907 


495 - 15668 
495 - 15906 
495 - 15907 


382 -11996 
2086-7590 0214-7748 227-8124 


266 - 9061 
276 - 9464 


3502-10023 
0499 - 15954 


227 -8122 


266 - 9068 
276-9524 


406 -127531 


266 -9145 
278-9564 


495 - 15892 
495 - 15906 
495 15910 


238 -8476 


266 -9171 
280 - 9624 


495 -15892 
495 - 15906 
495 -15910 


238 -8483 


268 - 9226 
300 - 10012 


CREATED Br 
CROSS REFERENCE 
VALUE 


044742 
002432 
* 104512 
002526 
* 104000 


MACRO ON 14- 


REF ERENCES 
3556-11407 


#1359-5147 
110-4112 
#1413 -S202 
#111-41i21 


1 
#159- -5114 
167-6300 
200 - 7365 


3530-11216 
3571-11717 


365 - 11605 


3556-11435 


447 -14236 


166-6215 
#164 -6154 





@313-102835 


0367-11629 
@367-11651 
0369 - 11666 
@371-11690 


JAN-B2 AT | 


415-12962 
219-7931 


’: 3] PAGE 6 
SEQUENCE 374 
CREF vol 
35356-11439 #356 -11441 
210-7670 2340-10914 
210 - 7669 266 - 9089 266 -9115 272-9261 
1586-5791 158-5726 156-5735 164 -6154 
270-9277 300 - 9986 3002-10044 4302-10056 
35324-10605 5367-11657 369-11673 369-11682 
4411-14092 4453-14141 4453-14144 443-14147 
4445-14169 445-14196 447-1 461 - 14650 
2450-14320 450-14323 2450-14342 2450-14343 
4495-15664 495-15885 495-15686 495-15667 
495-15905 495-15906 495-15907 495-15908 
0450-14345 461-14647 
2450-14344 1-14646 
0147-5368 4447-14245 2447-14246 2447-14248 
340 - 10874 -10889 «3556-11377 «356-11410 
292 - 9618 3-98860 293- 
179-6611 168-7175 190-7191 192-7221 
-7 236 -8391 236 -8420 238 -8462 
375-11614 375-11905 378-11942 378-11956 
371-11724 #371-11726 
@373-11778 
4451-14380 471-15091 
166 -6249 248 -8706 329-10696 364-11558 
164-6158 «300-9986 2«322-10571 2324-10596 
166 -6237 166 -6267 169-6339 206-7515 
219-7905 219-7941 219-7959 221-7987 
234-6336 236-8395 236-8424 238-8466 
- 244 -8594 244 -8597 244 -8598 
292-9649 293-9685 293-9667 293-9686 
3371-11705 3573-11746 375-11845 375-11846 
415-12964 0417-12996 2417-12999 


#315-10265 *3135-10286 3135-10287 


e324 - 


312-10256 


164 -6158 

3312-10253 
406 -12728 
4435-14150 
461 - 14656 
450 - 14348 
495 - 15890 
495 - 15909 


0447-14254 


10600 


216-7790 
227-8075 
240-8500 


417-13004 
3135-10289 


171-6449 183-7060 

312-10266 322-10571 
4339-14069 0439-14071 
445-14161 445-14172 


4535-14416 455-14491 
495-15892 495-15894 
495 -15910 


196-7288 1986-7327 
34868-11104 350-11212 
382 - 12026 


#324-10603 451-14378 


216-7791 217-7839 
228-8179 228-8180 
240-8505 240-8506 


244- 244 -8617 
314-103135 *362-115435 
415-12956 415-12959 
456 - 14569 

3153-10291 





NHECC 
INTFLA 


INT64K 
INVALI 
IOTVEC 
JPRLI 


KAMIKA 
KAMITE 


CREATED Br 
CROSS REFERENCE 
VAL 


MACRO ON 14-JAN-82 AT i? 


@3735-11752 
@375-11784 
0376-11915 
0378-11919 
#360 -11960 
#362 -11990 
166-7117 

@375 -11667 
#367-11655 


3567-11661 


¢369-11668 


#238 -8486 


0446 -14271 


#406 - 12700 





231-8260 


231-6266 


- 14099 
044) - -14100 


#184 - 7096 
#266 -9111 
#302 - 10057 
0445-14175 
461 -14652 
0356-11464 


0149-5434 
163-6095 


065 
169-6345 


340 - 10906 
214-7740 
®147-5376 


365 - 11591 
232-8278 


184-7098 
0266 -9114 
#375-11839 
0445-14195 
2461-14655 


149-5434 

163-6100 

208 - 7562 

236 - 8426 
#450 - 14338 


196-7303 


3468-11135 
170-6362 


346 -11041 
216-7795 


#365-11593 
240 - 8493 


3569-11685 
3468-11143 


450 - 14308 
#406 - 12702 
0436 - 13994 
#438 - 14040 
#445 -14169 


#166-7177 
#268 -9187 
#378-11939 
#445 -14197 
2461 - 14660 


#1635-5962 
163-6102 
- 7568 
236 - 8434 
4351-14393 


198 - 7337 


2346-11156 
179-6845 


#356 - 11380 
236 -8395 


#367-11636 
242-8522 


3755-11786 


#406 - 12720 
#436 - 13999 
04386-14045 
0445-14188 


#1686-7180 
#268 -$190 


382 -12009 
451 -14390 


163-5964 


0451-14397 


200-7377 


3486-11144 
208 - 7526 


@356-11457 
373-11752 


#3864 -12045 
244 -8586 


3753-11898 


#408 -12738 
#436 - 14004 
#438 - 14050 
#445 -14193 


#206 - 7489 
#266 -9201 
0443-14135 
4535-14431 


163-6004 
#1861 -6983 
4236-8389 

236 -8442 


202 - 7420 


346-111 
227-8077 


3786-11921 


0436-13961 
#436 - 14009 
e438 - 14055 
495 -15879 


453-14443 


163-6012 
#161 -6989 
236 -8399 


204 


- 7460 


228-8174 


3768-11951 


0436 - 13967 


#208 - 7560 
270-9275 
#445 -14160 
2455-14479 


165- “6016 


6358 - 11468 


Se #348-11160 «35350-11220 


5340-10903 


375-11815 3786-11944 38682-12014 


#384 - 12048 
0246 -8672 


CREATED BY 
— REF ERENCE 


172376 


* 104417 


002530 


4139-5007 
#111-4132 
0139-5150 
#238 -6455 


306 -10129 
#139-5151 


111-4126 
#139-5132 
ee 


MACRO ON 14-JAN-62 AT 


0238 
3086-10176 
#166 -6185 


¢348-11107 

3312-10248 

3569-11678 
3S 


#346 - 11000 
415-12955 


#179-6891 
#164 - 7090 


17:31 PAGE 10 
SE 376 
F vO1 
293-9853 293-9879 
219-7925 219-7949 
234 -8368 
232-8309 
219-7971 2234-8361 
166- 166 -6250 
248 -8706 250 -8745 
373-11756 3735-11774 
4411-12814 414-12911 
223-8037 - 
346-11077 354-1131 
160-5800 «160-5815 
163-6078 2163-6117 
163-5951 163-6081 
354-11313 410-12797 
#356 -11387 
2181-6964 161-7006 
163-5952 186-7150 
217-7874 227-8093 
244-8601 282-9643 
145-5336 163-5935 
168-7162 232-8299 
3486-11116 3486-11123 
3865-12103 
#163-5940 163-6120 
166-6186 166-6203 
238-8467 2240-8507 
310-10219 
166-6189 166-6226 
350-11206 3500-11211 
312-10263 331-10720 
413-128691 
3486-11108 350-11207 
@350-11248 413-12870 
181-6966 181-7010 
154-5507 
0350-11237 411-12841 
@350-11237 350-11250 
170-6376 171-6367 
362-11541 371-11712 
417-12996 
179-6895 «179-6899 


219-7950 


166 -6273 

3468-11169 
373-11776 
414-12915 


163-5937 
236 -8412 
3586-11471 


166 -6242 
2240-8515 
0242-8534 


331-10728 
3500-11215 


181-7012 


#413-12869 


411-12641 


206 - 7541 
3$73-11751 


219-7969 


171-6453 

350 -11228 
406 - 12697 
415-12974 
274-9329 

415-12963 
#160 -5859 

163-6120 
163-6104 


41353-12897 


227-8102 
293-9852 
166 -6191 


236 -8419 
3371-11703 


0236 -8383 
0242-8531 


#242 -8545 


331-10736 
362 -11529 


183-7059 
2413-12869 


240 -8498 
375-11612 


179-6904 179-6917 


219-7970 232-8305 
210-7676 210-7684 
3552-11287 352-11303 
4406-12713 406-12724 
4117-13006 
#356-11377 «356-11416 
4117-12961 
#161-5876 4161-5885 
3534-11345 
#163-6110 4163-6118 
417-12962 
230-8219 232-8288 
293-9889  312-10270 
167-6314 }#170-6375 
238-8470 316-10342 
3373-11745 375-11791 
236-8387 236-8403 
@242-8544 2244-8601 
242-8563 242-8570 


240 -8501 
362 -11546 
4086-12743 


#163 -5942 


240 -8507 
371-11708 


179-6870 


316-10351 
378-11947 


236 -8432 


#244 -8609 


3331-10786 33537-10827 5337-10837 


495 - 15886 


242-8527 


244-8591 


248 -6681 


375-11849 375-11904 5376-11955 





CREATED 6 
CROSS REFERENCE 
va 


eee 
ee 
~~n~~n 4 
Ndi g 
ech 


O71671 


“MACRO ON 14 JAN 62 AT 


REF ERENCES 
#111 -4155 
149-5419 


17:32 PAGE 11 
SEQENCE 577 
cRer vol 


216-7794 216-7799 


179-6840 206-7492 


214-7739 214-7744 
0214 - 7726 


oles. 10626 a. 10632 —- 111861 
-156865 


’ 
: 
oo 


$338 
3 





e% 


: 


wa 
& 
, 
A 
~ 


ste 


ie 


ERRSERDDERREEREESSECE 






va 
= 
fe] 
’ 
: 












oa 
pes 
3 





4’.5 - 15895 
415-12972 
415-12971 

#145 -5325 
411-12632 


503 - 16159 


450-14315 
#320 - 10442 
320 - 10491 


463 - 14695 


#216 - 780° 

238-6465 +¢356-11577 35% 11418 356-1145) 

@214-77%6 

©3486-11190 ©350-11229 «350-i12382 411-128@29 0415 12682 
e417-12991 495-1586865 495-1563: 

©417-12990 495-15685 495-15695 
145-5326 ©1866-7155 +¢348-11172 «3486-11180 «350 112% 
©415-126861 415-12970 «4117-12989 495.15885 495.15895 
139-5158 141-5221 144-5275 144- 144 -5302 
155-5602 155-5607 155-5611 172-6456 173-6499 
164-7102 214-7727 216-7785 274-9331 3086-10140 
3536-11395 362- 5362-11535 35365-11617 3864-12065 
419-13076 419-135119 420-13158 “1 446 -14279 
468 -14915 -1 70-15021 478-15432 4869-15725 

5301-16022 S01 -1602? 

508 - 16173 5003-16209 


4357-14515 4557-14519 4586-14565 0503-16056 
e320-10452 5320-10455 *#320-10474 2320-10480 +5320 -10482 
#320-10503 «5320-10513 5320-10514 *320-10527 *320-10531 


4635-14710 4653-14725 #505 -16060 


CREATED B+ “MACRO ON 14 JAN B62 Al i shavence 37k" 





CROSS REFERENCE 
VALLE REF ERENCE S 
071674 4586-14555 #505 -16061 
071700 3635-11561 #505 - 16062 
O71721 5365-11599 #503 -16065 
072511 3591-12131 #503-160668 
072535 3569-11675 #503-16089 
072547 3567-11660 5369-11684 #505 -16090 
072575 365 -11594 #503-16091 
072605 3569-11671 #505 -16092 
072622 3569-11680 #505-16095 
072636 5371-11693 #503-16094 
072656 375-11766 3865-12063 #503 -16095 
072675 35371-11694 3735-11736 @©93-160% 
072735 3571-11719 3735-11759 #503-16097 
072754 3571-11723 3735-11763 #503 -16098 
073102 1866-7126 #503-16101 
073105 #503 - 16102 
073 0503-16103 
073145 #503 -161 
073161 @503- 16105 
7320 #503 - 16106 
073237 #503 -16107 
07 #503 - 16106 
07 #503 - 16109 
073332 37686-11951 3862-12002 #503-16110 
073365 
073404 5864 0503-16112 
07 #503 -16115 
073476 
pd #503 -16116 
073655 
073675 
073745 #503 -16120 
073764 3382-12000 #5035-16121 
074017 #503 -16122 
074041 S62 #5035-16123 
074050 472-15250 #503-16124 
074070 #503 - 16125 
074101 472-15252 #505-16126 
O74111 0503-1612 
074125 #503 - 16128 
074206 #503 -16 
074215 0503-161 
074246 0503-16131 
074264 #503 - 16132 
074302 #503 - 16155 
074320 3486-11156 0503-16154 
074352 #503 -16135 
074373 0503-161 
074407 0503-16137 
074433 #503 - 16144 
074460 #503 -16152 





CZMSO0 CREATED B1 MACRO ON 14-JAN 82 AT 17: PAGE 15 
SYMBOL CROSS REFERENCE 


46353-14705 305 - 16155 


0505-16155 


#1861-6970 181-7014 161-7016 183-7059 495-15886 


194-7260 196-7297 198-7334 200-7374 202-7417 204-7457 6206-7488 
266-9151 


0254 -8796 
219-7966 256-8657 258-8877 
226-8162 #284-9672 284-9682 


-9965 

302-10019 #302 -10030 

234-8359 €304-10062 5304-10105 
@254-6821 256-8654 

219-7966 219-7969 256-8861 0256-8870 258-8885 
226-6171 284-9686 264-9696 
0288 -9756 
232-829 232-8304 296-9947 298-9950 

$00-10013 302-10021 #302-10037 








CREATED 6 
CROSS REFERENCE 
VAL 


021326 
021574 
021470 


gxt eet tw 
£88 ses 


ERBERUSLLNE 





we 
—_ 


Y ee) 
' 


MMR 
reo pepe 


EELS Ey 


NERA 
ae ee 
a. @ eS 
St 






. 
Secbraerteceasss 





BREE 


~wr%M 

= = p= pe 
Osa ~J 
as-ouie 
S328 
ae O~ 


MACRO ON 14-JAN-82 AT 





15 
216-7616 
216-7809 
216-7611 





3735-11876 


c 


~~ 
17:31 PAGE 14 
SEQUENCE 5380 
CREF vol 
234-8367 #€304-10069 
@256 -8859 256 -8855 
228-618 @284 -9700 284 -9710 
@268 -9775 
€298 -9958 
3002-10026 #302 -10049 
3004-10072 #30< -10087 
-6647 
228-6196 #286-9715 286 -9725 
@290 -9793 
300 -9993 300-9995 #300-10011 
234-8362 €304-10100 
226-6205 286-9729 286 -9737 
35300-10004 300-10006 #302-10019 
#252 -8761 252-6763 2«314-10317 
252-8772 
@252 -8784 
219-7968 #258-8879 
@292 -9611 
#306 - 10108 
306 -10136 
0306 - 10165 
3100-10228 
236-8408 236-8431 236-8437 244-8625 
166 -6187 166-6213 166-6247 0166-6285 
, e227 -8139 227-6139 0227-8147 
#217-7650 375-11868 
€217-78672  375-11669 
375-11670 
219-7936 375-11871 
219-7954 375-11872 
221-7976 375-11673 
1-7963 375-11874 
3375-11675 
35375-11676 
375-11877 


244 -8631 


166 -6286 


314-103518 ©314-10320 5314-10323 


244-8637 @311-10231 
























CZ™SD0 CREATED Br MACRO ON 14-JAN-82 AT 17:31 PAGE 15 
SEQUENCE 5361 
SYMBOL CROSS REFERENCE , ay 
SYMBOL VALUE 
MTOO14 021544 3753-11679 
MTOO1S 021622 
MTOO16 021670 
T0017 021736 375-11882 
MTOO20 021760 
MTOO21 3050 3735-11684 
MTO0022 023322 3375-11665 3862-12015 
MTOO23 025354 
MTOO024 023420 3735-11687 
MTOO25S 3664 
MTO0026 023732 375-11889 
MTO0027 0242 
MTOOSO 024720 375-11891 
MTOOS1 025222 3786-11945 
MTOOS2 025412 
MTOOSS 025744 
MTOO34 026132 216-7608 216-7826 0244-8615 375-11895 
MTOOSS 026504 
MTO2OY 022616 @228 - -8174 
MTO20Z 022432 
T0999 026416 212-7706 212-7709 212-7710 212-7711 212-7712 212-7713 212-7714 
212-7717 212-7718 212-7719 212-7720 212-7721 214-7739 214-7774 
214-7777 214-7778 214-7779 214-7780 214-7781 216-7794 216-7828 
nT, . 216-7831 216-7832 246-8667 
MT2 016272 
mur i ©1864-7096 2164-7099 6168-7177 4188-7179 *206-7490 206-7503 «375-118639 «378-11939 
45355-14477 461-1 ©461-14638 461-14652 *461-14654 2461-14660 
053706 #419-13118 
#166-6199 166-6223 166-6235 166-6257 166-6281 +*324-10584 
002272 3548-11173 3486-11163 ¢350-11224 5354-11319 5354-11332 
35350-11209 #354-11342 
061016 0468 - 14925 
#367-11656 *369-11672 Ae 4350-14303 450-14340 451-14363 2451-14392 453-14429 
6236-8445 2238-8460 2238-8477 «2386-8488  365-11583 
002076 ©166-6266 *166-6275 5324-10582 
036744 
002074 #157-5644 161-5875 4164-6141 ¢166-6179 4166-6221 *2086-7558 
216-7600 22235-8030 227-6072 %227-8145 *238-8451 *240-8497 
* 3S #300-10008 «3512-10244 ¢312-10272 322-10555 322-10559 5322-10566 
e371-11692 0371- 11727 373-1173535 3735-11734 3735-11779 «375-11859 «375-11864 3786-11920 
3862-11991 *382-12024 
NORE S 003642 €144 -5279 
wOSCOP 002412 ©2350-6215 230-8256 *232-8260 2232-83517 4258-8460 238-8477 4236-8488 +240-8495 
2242-8 242-6579 - 0244-8612 447-14238 451-143568 
NOSUPE 002430 #145-5331 145-5350 155-5577 217-7854 217-7878 240-8508 242-8535 244-8602 
5340-10868 5346-11004 3546-11021 5346-11046 346-11067 410-12789 411-12810 411-12830 





41353-12879 414-12906 415-12966 


417-12967 


4635-14699 


PATERR 
PATPLY 








CREATED 8 
CROSS REFERENCE 
VALUE 


002344 
0554 7é 
002426 


002316 
264 


MACRO ON 14-JAN-82 AT ji 





Wi**> 


35320-10492 5320-10515 ¢457-14514 0457-14517 ¢457-14528 «457 14530 «458-14552 


37:31 PAGE 16 
SEQUENCE 5382 
CREF vol 
320 - 10454 
€447 -14219 
145-5335 163-5931 163 -6066 
3690-11487 362-11532 
2246 - 8669 
169-6337 169-6355 ¢169-6356 
66 -6241 171-6407 171-6409 
313-10299 4386-14020 
495 -158663 
196-7322 198-7347 196-7355 
-7 200-7387 200-7392 
@202-7405 202-7430 202-7438 
@204-7443 204-7470 204-7475 
2164 -6140 164-6152 «166-6198 
#322 -10555 
226-6159 228-8163 *228-8168 
- 2300-9975 2302-10037 
#371-11710 e371-11727 373-11733 
0147- ° -5384 
-7561 2238-8448 
270-9247 272-9262 
274-9407 276-9444 
#280-9605 «280-9607 
166 -6231 166-6253 
149-5414 149 -5417 
#190-7196 «192-7230 
216-7 3586-11459 
0375-11903 3786-11920 
16-77 @219-7903 
@375-11860 «375-11902 
3376-11914 
@#316-10379 
316-10362 #316-10373 
4406-12727 439-14064 
@439-14075 
S 43536-13962 4356-13968 
4386-14031 4386-14036 
441-14101 
252-8780 3068-10180 
252-8768 j 252-8795 30868-10174 
256 - 884 256 - 8850 
258 - 258 - 8888 


186-7151 


210-7653 


200 - 7400 


204 - 7483 
166 -6255 


0226-6172 
2302 - 10049 
e373-11749 


238-8471 


219-7938 


439-14076 441-14091 


227-8079 


210-7655 


166 -6255 
#226 -8164 


#302 - 10052 
0373-11779 


238-8472 
272-9296 
276-9501 


219-7956 


227 - 8066 


219-7939 


166-6277 


2226-8188 
¢312-10249 


266 - 9044 
272-9299 
276-9503 


@149-5427 
1986-7323 
3375-11785 
#382 -12024 
221-7978 


0443-14112 445-14185 


227-6131 


292 - 9820 


340 -10887 


292 - 9822 


e322-10557 495-15883 


2228 -8195 


312-10264 


266 -9116 
274-9345 
@276-9505 


#200 - 7361 


228-8197 
322 - 10564 


266 -9128 
274-9390 
278-9545 


e202 -7425 


#375-11803 375-11804 


221-7995 


0234-6331 


43536-15974 436-13980 436-13995 436-14000 4538-14016 
43868-14041 43868-14051 438-14056 4388-14061 0439-14063 


311-10238 


CREATED 6Y MACRO Of 14-JAN-82 AT 17:51 PAGE 17 
= WEF ERENCE CREF vol 
v 


288-9779 290-9863 293-9658 2935-9862 
268-9785 290-9797 293-9867 293-9871 


286-9733 
274-9377 274-9384 276-9479 276-9485 278-9577 278-9584 





266 -9107 


266-9100 266-9115 268-9203 
35310-10197 310-10204 
340-10915 


43539-14079 441-14090 0441-14103 4435-14134 445-14170 





169-6357 34868-11105 ¢356-11379 «356-11419 
#159-57435 2159-5764 159-5789 *160-5827 *160-5852 2160-5853 «160-5864 244-8653 
3286-10658 53526-10662 5329-10682 5329-10684 329-10686 5346-11165 ©348-11165 34868-11191 


179-6920 *179-6925 179-6926 179-6930 179-6932 179-6934 179-6936 4179-6938 


0456-14566 2456-14569 2458-14570 2458-14571 2458-14573 458-14574 

2145-5347 145-5348 #£145-5357 151-5461 161-5891 164-6160 166-6182 166 -6211 
166-6245 217-7842 217-7864 =217-7890 219-7910 219-7943 219-7961 228-8156 
228-8181 2286-8190 228-8199 230-8222 230-8224 232-8289 232-8291 234-8338 

236-8406 236-8429 236-8435 238-3452 242-8553 242-8573 

244-8629 244-8635 314-10315 329-10691 5348-11170 350-11234 367-11658 367-11662 
35369-11686 5371-11728 3735-11780 411-12839 413-128667 447-14251 451-14375 461-14657 

181-6953 *161-6962 181-7016 161-7020 

155-5561 2155-5582 «155-5568 «166-6210 ¢166-6227 166-6244 4166-6270 «171-6390 

®240-8499 2242-8547 2244-8593 «248-8703 2250-8736 2316-10336 «329-10707 «329-10709 

3486-11167 «350-11226 *352-11285 *352-11301 ¢362-11542 ©371-11713 «373-11753 «373-11771 «375-11835 








SBENT 


CREATED Br 
CROSS REF ERENCE 
VALUE 


000024 
002410 
002520 


0357:0 


017372 


REF ERENCES 
e376-11935 


210-7630 


“MACRO ON 14-JAN 62 AI 


5369-11676 


165-5979 
335-10612 


217-7838 
#223 -8006 


e276- -9518 
280 - 9599 
210-7632 


17:32 PAGE 18 
SEQUENCE 
CREF vOl 
#406 -12695 ©406-12711 *406-12721 ©4086-1274] «4086-12753 e411 12806 e411 -12812 
©415-12956 ©417-12997 2463-14701 ¢e463-14702 2463-14717 
147-5362 2155-5480 2410-12780 e410-127Al 2411-12847 0413-12858 ¢414-129%0 
“tan uae 0415-12961 ¢417-12998 2417-12999 
153-5464 186-7i27 «186-7129 228 -8153 244 8660 266 -91235 268 - 9720 
276-9496 260-9598 
@304-10077 2304-10061 
4472-15162 472-15213 
35371-11695 5373-11737 373-11769 375-11789 5375-11802 375-11807 %8§4-12034 
266-9082 300-9985 302-10042 302-10054 312-10257 333-10756 %333-10777 
367-11655 369-11670 369-11679 406-12714 411-12822 463-14678 
@217-7851 e217-7873 *219-7902 4219-7937 2219-7955 ¢221-7977 «221-7964 
223-6014 2223-8028 2223-8038 225-8048 2225-8056 2225-8061 «227-8071 
231-8270 2232-86261 2232-8323 2234-8330 «236-8379 2238-8450 «240-8496 
244-8616 « - 6246- 34868-11146 348-11154 4423-14140 443-14143 
4486-14273 457-14537 470-15020 
0293 -9694 
@#313-10277 
#346 -11161 
194-7277 196-7314 198-7352 200-7397 202-7435 204-7480 238-8474 
219-7929 232-8313 234-8352 234-8369 314-10321 314-10326 352-11268 
35367-11648 455-14480 476-15346 
#141-5219 151-5442 
0147-5386 
0367-11646 
192-7237 194-7274 196-7311 198-7349 200-7394 202-7432 204-7477 
356-11 35360-11484 362-11524 365-11583 410-12795 448-14275 470-15014 
190-7194 192-7224 194-7256 196-7293 196-7332 200-7372 202-7415 
236- 236-8421 238-8464 2356-11379 2356-11419 2356-11422 «356-11430 
382-120 
3375-11909 
219- - 232-8302 234-8345 234-8358 314-10312 352-11266 
4453-14410 476-15331 
-9040 266-9055 266-9057 266-9118 2266-9120 *266-9120 «268-9159 
268-9167 268-9178 268-9215 *268-9217 4268-9217 270-9241 «270-9242 
270- 270- 72- 272-9292 *272-9292 272-9302 272-9305 
272-9315 2274-9339 «274-9340 274-9350 274-9352 274-9356 274-9356 
@274-9400 20274-9410 274-9413 2274-9420 274-9421 274-9423 «276-9438 
276-9451 76-9455 276-9457 276-9497 2276-9499 6276-9499 «276-9508 
276-9519 276-9521 «278-9539 «278-9540 278-9549 278-9551 278-9555 
260-9601 2280-9601 «280-9610 280-9613 +*280-9620 - -9625 
210-7637 210-7639 210-7648 210-7654 210-7656 210-7662 210-7664 








CZ™SD00 CREATED Bt MACRO ON 14-JAN-62 AT ‘7s “pe ™ 
SYMBOL CROSS REFERENCE voi 
SYMBOL §=VALUE REF ERENCES 
210-7673 210-7682 
SBETES 017114 206-7555 210-7597 
SCOPE ° #111-4122 157-5616 164-6155 166-6170 169-6318 184-7075 184-7092 248-8709 250-8/74¢ 
SOPARO « 17 111-4266 219-7924 219-7926 232-8304 232-8306 232-8307 234-8362 
SOPA®ARS + 172272 #111-4291 ¢219-7928 +«2352-8 
SOPARG + 172274 111-4292 «234-6364 
SOPAR7T + 172276 111-4295 «219-7927 
SEEDHI 002544 141-5209 ©2147-5366 234-6535 2234-8372 4474-15304 474-1531i1 0474-15316 
SEEDLO 002546 141-5210 6147-5367 234-8332 4234-837i 474-15303 474-15309 «474-15315 
SELON. 002000 6139- 164 - 208-7512 356-11429 *«385-12095 «35385-12100 
SETPAT 192 - 196-7 @356 -11465 
i 011612 #167-6500 167-6315 
SHUTUP 045170 -7136 -11505 #362-115153 
SIPARO + 172240 #111-4276 5346-11002 
SIPARS + 172246 #111-4279 -9032 *266-90353 340-10870 5346-11020 
SIPARS + 172252 eer B 217-7856 217-7880 240-8510 242-8537 244-8604 266-9033 4266-9034 346 11050 
SIPARG + 172254 111-4262 217-7656 217-7880 240-8510 242-8537 244-8604 +346-11071 
SIPORO + 172200 111-4256 5346-11003 410-12799 4135-12899 
SIZE ° #115-4415 164-6146 166-6206 166-6239 217-7840 217-7853 217-7875 219-7942 219-7960 
234-6537 236-8597 236-8426 238-8465 242-8530 242-8567 244-8618 5314-10314 348-11168 
3550-11227 352-1 3352-11302 
SKIPKA @139-SO001 5367-11632 *567-11634 «38684-12043 «384 -12049 
SK IP rex 002314 01359-5102 169-6344 206-7496 227-8096 4356-11380 «356-11440 
SKU 055524 447-14221 447-14224 0447-14234 
-S026 210-7645 4210-7668 5340-10911 +*340-10915 
SKUB 043144 3486-11155 #346-11156 
SKUJ 013142 179-6916 #179-6919 
#141 -5205 -8502 
° -8500 240-8505 0306-10136 
002562 0141-5216 
002274 @139- 268-9165 *270-9256 *274-9354 4276-9453 «278-9553 «300-9971 342-10931 
002234 #170-6369 *208-7518 *208-7528 208-7550 208-7582 «208-7585 «208-7592 
0227-6142 5346-11026 346-110335 «375-11843 «375-11648 
“aah #246-6704 6250-8741 411-128135 #414-12910 4635-14703 
* 002000 137-4975 137-4991 141-5206 153-5483 186-7134 
003632 #144-S272 362-11510 
000300 
000310 
024314 
002372 447-14234 2447-14235 2471-15090 
002 #159-5115 2292-9625 292-9629 292-9848 4293-9879 293-9679 
149-5425 151-5436 
004736 #1535 -5466 
011606 166-6222 167-6295 
013322 179-6939 181-6952 
12466 170-6364 177-6799 
010540 163-5953 164-6151 
002306 @159-5S099 22086-7544 «2086-7570 208-7576 +«380-11969 3860-11974 *380-11976 
002256 139-5086 6217-7844 6217-7866 217-7892 2219-7913 2219-7916 4219-7945 6219-7963 «221-7980 


CZ™SDD 


S’MBOL 
S*MBOL 


CREATED BF 
CROSS REF ERENCE 
VALUE 


MACRO ON 14 


JAM B62 AT 17:51 
a 


151-5462 
164 -6165 


450-14310 
1866-7127 

346 -11096 
3486-11117 
447 -14241 


3316-10345 
4350-14557 


; PAGE 20 
CREF vol 
@223-8007 «223-8021 
©2286-8183 «2286-8192 
232-8297 «232- 
236-8437 2238-8458 
0244 - 86 250-8743 
217-7896 219-7921 
244 - 8640 -8680 
219-7972 226-8175 
217-7893 219-7914 
225 - 225- 
234-8 234-8353 
@250 -8714 314-10319 
219-7965 228-8169 
240-8516 242-8566 
-8692 «250-8717 
250-8718 
250-8728 
5003-16205 
248 -8704 250-8741 
151-5457 «151-5462 
214-7730 214-7745 
280 -9597 316-10345 
4411-12843 4135-12865 
4451-14368 455-14461 
155-5596 4688-14945 
170-6378 214-7730 
2286-6153 266-9122 
3486-11153 450-14349 
451-143568 


#240 - 
#314-10318 


228 -6164 
3314-10325 
228 -8196 
221-7981 
225 -8065 
236 -8383 
226 -8194 


242-8576 
250-8725 


4635-14706 


155-5481 


227-8121 


214-7745 


268 -9219 


223-8039 


228-8189 
228 -8207 
221-7991 
226 -8160 
236 - 6409 


228 -8205 
244 -8611 


4635-14712 


155-5596 
228-8155 
3468-11117 
4447-14241 
466 - 14955 


227-8121 


272-9288 


0234-6351 
2242-8575 


230 -8245 
230 -8248 


221-7996 
228-8185 
236 - 8436 


230-8235 
244 -8663 


164 -6165 
266 -9122 
3468-11153 
447 -14259 
468 -14975 


3375-11852 


274-9396 


e225 8057 


230-8236 
0250 -6715 


170-6378 
268 9 


378-11924 


276-9495 


e225 - 8062 
e230 86237” 
0236 -6402 
0244 - 8626 


234-8370 


161-7024 
272-9286 
3786-11924 
450 - 14349 


382 -11995 


260 -9597 














CZ™S00 CREATED 8 MACRO ON 14-.JAN-82 AT 17:31 PAGE 21 
SEQUENCE 587 
SYMBO. CROSS REF ERENCE vol 
SYMBOL VALUE REF ERENCES 
TAG7O$ 057202 455 -14457 04657-14499 
TAG715 057212 4555-14458 0457-14505 
TAG72$ 057222 4355-14459 #4657-14511 
TAG73$ 057272 4355-14460 0457-14525 
TAG74$ 057332 455 -14461 0457-14537 
TAG7S$ 057344 455-14462 0457-14545 
TAG76$ 057356 455-14463 0456-14549 
TAG?7$ 057422 4555-14464 0458 - 14562 
TAG764 057430 455 -14465 0456-14566 
TAG79S 057510 455-14466 0456-14563 
TAG9S 011050 166-6186 166-6190 166 -6225 166 -6262 166 -6284 
TBG4$ 026740 250-8726 0250-8728 
TCF IGi 037256 @320-10436 320-10456 457-14516 
TCF IG2 037410 @320-104665 320-10494 4586-14554 
TCFIGS 037576 @320-10503 320-10517 457-14529 
TCONM I 037134 316-10350 316-10361 316-10371 #318-10395 
TEMP 002406 ee 163-5965 163-6031 163-6033 «183-7031 163-7048 2183-7049 2380-11962 «380-11963 
TEST 006044 157-5651 157-5663 157 -5666 158-5670 158-5676 1586-5718 
TESTAD 002 364 159-5125 159-5745 2159-5746 «159-5747 163-5927 4163-5957 2163-5958 «163-6097 «163-6108 
-7548 e206-7549 « -7552 2208-7554 «208-7573 208-7573 210-7623 
221-7979 221-7996 4227-8081 227-8088 «227-8093 «227-8096 
227-6111 «227-8132 «227-8134 228-8150 228-8151 266 - 9059 
268-9169 268-9210 -9227 70-9238 272-9319 274-9364 
276-9470 276-9474 76-9525 278-9563 278-9572 280-9627 
#375-11646 2375-11850 «375-11902 443-14129 
TESTMO 002524 166 -6210 166 -6227 166 -6244 166 -6270 171-6390 210-7625 
250-8736 329-10707 362-11542 371-11713 373-11753 373-11771 
40868-12741 408-12753 
TIME 002312 
TIMEOU 040132 ss mete 164 -6160 166-6220 0324-10595 367-11658 367-11662 
TKVEC 000060 #316-10334 ¢316-10376 «316-10376 375-11785 375-11785 
378-11920 «378-11932 «378-11933 «378-11954 
@#382-12024 «382-12024 
TMFLAG post ty 358 -11449 
TOTCSR 002220 163-5928 333-10752 335-10787 339-108643 
TRACE 006140 #161-5890 26387-12114 «389-12120 447-14216 
TRAPVE 0000 
TSTBAN 011450 
TSTOAT 242 266-9048 266-9049 266- #266 - 9056 
®266-9135 2266-9136 *268-9161 «268-9162 
270-9245 «270-9246 «270-9249 +#*270-9250 
270-9267 70-9269 *272-9300 «272-9301 
@274-9357 6274-9359 2274-9361 4274-9363 
274-9409 ¢276-9442 2276-9443 4276-9446 
276-9462 276-9465 276-9468 276-9476 
278-9547 2278-9548 278-9553 «278-9556 
278-9574 278-9581 *280-9608 «280-9609 
300-9991 2300-9992 «300-9994 «300-9997 





CZ™S00 


SYMBOL 


TYPEIT 


CREATED Br 
SYMBOL CROSS REF ERENCE 


VALUE 


* 104401 


MACRO ON 14-. 


329 
110-4110 
0157 -5616 
0164-6155 
#166 -6170 
0169-6316 





#111-4215 
#139-5126 
190-7214 


#300-10000 #300-10002 
4435-14132 
529 - 10695 


210-7641 


181 - 7004 





217-7859 


217-7859 


#346 -11069 
346 -11007 


#1861 -6995 
192-7244 


AN-62 Al 





17:31 PAGE 22 
SE NCE 5868 
F vol 
4495-15892 495-15892 
@329-10706 
210 - 7666 266 - 9096 
181-7012 
154-5512 
181-7005 
-7579 
316-10357 
318-1 
320-10532 
367-11630 
3711-11723 
375-11788 
3786-11948 
-12033 
387-12113 
453-144 
4586-14553 
-146 
463-14729 
468 - 14968 
471-15104 
472-151869 472-15191 
4457-14499 463-14679 
208-7578 371-11716 
470-15020 
346-11006 354-11310 
0234-6363 «234-8368 
219-7927 234-8364 
236-8386 244-8626 
228-6188 228-8206 
217-7863 «219-7950 
217-7883 219-7951 
354-11312 410-12796 
#181-6996 4181-6997 
194-7261 196-7318 


#300-10003 «300-10005 


266 -9109 


161-7016 
154-5514 


367- ~ 11660 


472-15192 
463 - 14694 
3735-11767 


#314-10324 


219-7970 


219-7971 
413-128698 


#161 -6996 


196-7356 


302 -10031 


266 -9185 


181-7020 


154-5521 
eee 


471- -15113 
472-15193 


465 - 14696 
3735-11776 


346 - 11023 
352-11289 
240-8515 


226 -6165 


#181 -6999 


200-7401 


302 - 10033 


266 - 9197 


181-7022 


47i- 15118 
4472-15248 


4635-14709 
3800-11978 


242-8540 
228-6197 


181 - 7000 
202-7439 


438 14025 


166-7131 


3735-11616 
982 


468 - 14942 
470-15015 
471-15119 
472-15250 
46353-14711 


457-14 .37 


244 -8607 
240-8515 


181-7000 
204 - 7484 


436 - 14030 


580 - 11964 
160 -5863 


161-7023 
316-103553 


362 -11993 


470-15017 
4471-15121 
472-15251 
4635-14724 


457-14543 


546 -11048 
242 -8540 


238 -8484 







CZMSDO CREATED Br MACRO ON 14-JAN-62 AT 17 ‘ee X y 
SYMBOL CROSS REFERENCE CREF vol 
VALUE REF ERENCES 
@350-11203 360-11484 362-11524 
139-5068 2274-9369 274-9386 2274-9386 «278-9568 280-9587 «280-9589 
34868-11166 350-11225 352-11267 #354-11309 
#111-4120 155-5590 250-8739 463-14721 463-14727 
o131-4141 155-5591 «250-8739 411-12807 #414-12914 463-14718 
0254-8610 4313-10303 
06254-86615 +313-10304 
€254-8827 4313-10305 
0254-8632 4313-10306 
@314-10324 
@314-10317 
35314-10316 #314-10323 
0236-6 
110-4102 
110-4100 
110-4103 171-6400 171-6412 171-6423 171-6433 270-9273 
110-4101 
7-11652 369-11667 0391-12124 
4115-12959 415-12962 415-12964 417-12980 417-13003 0417-13011 417-13014 
410-12795 #415-12952 
#415-12957 #415-12956 415-12959 417-12998 417-12999 417-13002 0417-13014 
an? .ikeas 4415-12959 415-12960 415-12962 415-12962 415-12962 0417-12979 417-13003 417-13004 
141-5206 2147-5361 4194-7269 2196-7306 «200-7389 «204-7472  356-11426 
6419-13068 pr abe a | #419-135105 2419-13106 419-13107 2419-13111 #419-13112 419-13113 468-14920 
¢1535- 451-14362 
145-5321 292-9819 292-9823 
0478-1543 
153-54 153-5484 155-5597 468-14949 
0448-14272 
3786-11948 362-12018 450-14312 
4861-15507 
4861-15506 
4861-15550 
461-15551 
#419-135066 2419-13124 0419-13129 
1 5558 
2 0471-15140 








471- 15113 


0471-15141 


CREATED 6+ MACRO ON 14 JAN B2 AT 17:31 PAE 24 
SEQUENCE 590 






CROSS REFEREE Cree vol 
vu Ut RE ERENCE S 
0631246 0477-15364 
002620 #141-5239 161 7001 3$16-10553 3316-10356 3680-11982 419-15055 4553-14411 453.14488 45% 1444? 


46353-14672 46353-14695 4635-14708 46353-14723 465.1473) 468-1497" 470.15004 471 15114 


060 764 467-14867 467-148697 0467 14905 
062 756 456 -14575 04676-15351 
063162 149-5405 476-1 
0476 -1542 
0476-15426 
063170 0476-15429 
0476-15430 
0476-15431 


5502 
©1866-7162 2447-14210 °©447-14212 @#677-15371 
166-7135 1866-7135 #166-7169 


154-5496 166-7141 


0477-15376 
0477-15380 


0447-14263 2450-14306 


3860-11966 380-1 oats 0450-14314 0450-14316 451-14362 
451-143571 451.14575 

476-15445 

0477-15366 


0472-15184 0472-15195 
@414-12937 414-12936 


450-14325 450-143535 2450-14336 4553-14415 





- 10624 1-15500 
0346- 11075 4861-15504 


SPATMA 





CREATED BF 
CROSS REFERENCE 
VAL 


040512 
002564 


0438 - 14033 





4861-15524 


MACRO ON 14 JAN 62 AT i7:5 PAGE 25 
SEQUENCE S91 
CREF vol 
REF ERENCES 
0141-5240 471-15128 
#328-10653 481 -15509 
0141-5217 248- °246-6693 248-8694 6248-8710 250-8716 6250-8726 250-8727 «250-874? 
0447-14261 2447- 14266 447 -14268 
#141 -5218 246-8683 2248-8694 2248-8710 250-8716 6250-872? 0250-8747 447-1426] 0447-14265 
451 - 14369 
0477-15398 
0477-15402 
0477-15405 
0477-15408 
0477-15366 478-15441 478-15445 
183-7032 0677-15391 
0477-15400 
0477-15403 
0477-15406 
0478-15441 
4668-14954 0471-15144 
0477-15375 
0477-15374 
0451-14379 0477-15367 
4466-14952 #471-15145 
4861-15487 4861-15540 481-15541 4681-15542 4681-15543 481-15544 4861-15565 
4681-15568 4861-15569 481-15570 481-15571 
@157-S616 0164-6133 164-6133 0164-6133 0166-6170 166-6170 0166-6170 
@169-6316 0184-7075 184-7075 0184-7075 0184-7092 184-7092 184-7092 
0466 14846 
476-15361 
466-14808 ©466-14811 2466-14822 0466-14848 
0447-14267 
166-7125 166-7131 186-7159 *186-7165 223-8004 223-8012 223-8026 
225-8054 227-8069 232-8321  348-11100 380-11962 0477-15370 


4414-12926 2448-14273 2448-14277 44868-14282 448-14283 450-14309 











CREATED BY MACRO ON 14-JAN 62 AT 17:31 PAGE 26 
SEQUENCE 392 
CROSS REFERENCE CREF vOl 
VALUE REF ERENCES 
054410 0436-14036 461-15525 
054426 @436-14045 4861-15526 
054446 0438-14046 48681-15527 
054464 0436-14055 461-15526 
502 @436-14056 4861-15529 
051240 -12693 4861-15550 
054672 0441-14095 4861-15551 
054712 0441-14099 4861-15532 
051466 0406-12738 4861-15555 
055102 04435-14156 1-15534 
0445-14156 4861-15555 
0445-14165 4681-15536 
055326 6445-14176 461-155357 
0445-14165 4861-15556 
055414 0445-14193 4861-15539 
051634 147-5381 0410-12767 414-129350 
052210 4111-12647 0415-12854 417-15010 
002621 #141-S238 4686-14995 471-15121 
062662 
061514 
06 1644 
062230 
040406 
062624 
062566 
ceases : ©4135-12861 °413-12862 0414-12939 417-12993 
. 1 166-6170 169-6318 184-7075 184-7092 
055700 0447-14264 
° et teed 164-6153 166-6170 169-6316 184-7075 184-7092 
063102 0477-15369 
3375-11834 375-11901 3786-11934 378-11953 382-12005 3862-12023 
-14959 470-15031 471-15051 471-15057 
002604 375-11636 375-11899 2786-11936 378-11952 3862-12007 382-12022 
46686-14957 470-15029 471-15049 471-15055 
000007 157-5616 157-5618 164-6133 164-6155 0164-6133 166-6170 166-6170 
eins. tear 169-6318 169-6316 169-6316 184-7075 164-7075 184-7075 184-7092 184-7092 
002612 #141-5255 419-13118 
002332 @1359-S111 6155-54735 419-13036 
002610 141-5234 419-13100 
063212 147-5379 0479-15455 
063234 0479-15466 4861-15481 
063254 479-15460 0481-15481 
063202 0476 - 15442 
0404 26 @329-10678 4861-15562 
062142 471-15076 471-15079 471-15101 4711-15119 471-15133 0471-15137 
0605 0467-1 4861-15486 
34 0419-13038 4861-15462 
053556 419-13058 419-135065 0419-13069 4668-14961 


ee Bic? 





CREATED Br MACRO ON 14-JAN-62 AT 17:51 PAGE 27 
SEQUENCE 5395 
. CREF vOl1 
053744 419-135125 419-13127 0419-13130 
060 346 0466-14602 4681-15465 
060362 466 -14801 #466 -14804 
060322 0466-14797 4861-15464 
063110 166-7165 ©447-14215 
0476 - 15444 
063122 186-7159 0477-15385 
063146 6477-15409 
063150 0477-15410 
041142 ©335-10786 4861-15554 
040776 @3335-10751 4681-15552 
041256 @335-10612 461-15555 
lile @3335-10777 4861-15553 
055572 0447-14245 
014452 01686-7134 451-14386 


©466-14798 *466-14802 466-14812 0466-14847 


CZ™S00 


CREATED Br 


MACRO CROSS REFERENCE 
REFERENCES 


MACRO NAME 
AND 


ANDB 
BEGIN 
BMOV 


CASE 
CLEAR 


CLEARS 
OLEFT 


DOWN TO 
ELSE 


END 


0445-14151 


12894 
0445-14161 
0463-14712 
@186- 


292- 9617 


MACRO ON 14-JAN-82 AT i?: 


179-6642 
385 - 12061 Es 


















206 - 7545 


4635-14674 


@217-7895 
@228 -6171 
232-8305 
0244 -8625 


#210-7635 


@316 - 10366 


9266 -9126 
@260 - 9601 


0164 -6165 
#1835-7039 


0450 - 14317 
6451-14391 
#470-15016 


@322-10571 


179-6610 
227-8127 


#333-10755 


227-8078 


219-7919 


0226 -8187 


#234 -8359 
#314-10325 


#210-7685 


@337-10822 


0268 -9217 


167-6306 


#455 - 14485 
@470-15037 


@324 - 16596 
181-6957 


236 -83589 
@335-10790 


3335-10754 3355-10789 339-10844 


@219-7°22 
@226 -6196 
@234 -8360 
@329 - 10695 


0236-8477 
0337-10826 


0268 -9225 


167-6311 
0214-7747 
#329-10701 
©406 -127352 


@153-5474 


@356-11431 


@463- 14661 


#324 - 10600 


181-6964 
236 -8390 
0339-10845 


219-7923 
228 - 8205 
0234 -8362 
#348 -11168 


0238 -8488 
0346-11160 


0272-9286 


0169-6348 
@223-8018 
@3335-10771 
0419-13115 


@1535-5477 
#167 -6309 
@170-6362 
#179-6869 
#181 -6990 
#1835-7073 


0293-9872 
@333-107635 


#339-108651 @ 


#346 -11140 
0362-11511 
@375-11858 
#362 -12017 
0411-12626 
0443-14145 
#450 -14351 
#463 - 14685 


@324 - 10605 
161-6991 


236 - 8416 
0346-11103 


6219-7924 
0230 -8244 
0234 -8367 
6350-11227 


©266 -9148 
@350-11220 


@272-9292 


170-6380 
@227 -8097 
@335 - 10806 
0439-14070 


#155 -5469 


@227- -8139 
0236 -8439 
@246 -6677 
0293-9675 
@3335-10765 
0852 


183-7035 
236 -6419 
348 -11126 


3486-11102 
219-7948 


@3S52 - 11286 


0272-9320 
#350 -11237 


0274-9394 


179-6661 
@227-8115 
#362 - 11508 
@439 - 14082 


#153 -5490 


7 €413-12892 


0443-14151 
0450 - 14360 
0465 - 14697 


166-7174 
238 -8461 
376-1194) 


CZ™S00 


CREATED Br 


MACRO eo REF ERENCE 
MACRO 


GOTO 
iG 








- 
MACRO ON 14-JAN-82 AT 17:31 PAGE 29 
SEQUENCE 5395 
CREF vol 
REFERENCES 
38680-11970 3862-12011 385-12106 0411-12619 0413-12887 0463-14675 463-14692 463-14707 
#13-2000 @ - 3966 -8154 3575-11796 @375-11817 #378-11949 #362-12019 #450-14356 
04-100 #106 - 3964 151-5442 151-5457 0153-5483 153-5485 154 -5496 155 -5597 
166-6277 66 -6281 167 -6302 1é~ °303 169-6342 169-6343 169 -6344 169-6345 
170-6362 170-6378 179-6835 19-6340 6179-68643 179-6849 179-6854 #181-6956 
181-6961 0161-6967 #161-6974 16°'-“<975 #161-6992 181-7000 161-7024 163-7030 
184-7 186-7127 186-7156 166-7159 168-7176 206-7495 -74 208-75 
2086-7576 210-7642 210-7648 210-7667 210-7673 214-7730 214-7739 214-7745 
223-8003 3- 225-6011 223-8012 223-8016 223-8025 223- 223-8034 
225 -6045 - -8053 225- 227-8068 $ 227-8069 227-8077 8227-8079 
227-8087 =227-6109 227-8121 227-8131 228-8153 232-8320 232-8321 236 -8392 
236-8414 236-8421 236-8428 236-84 238-8463 2386-8464 238-8471 244-8627 
-9061 -906353 266-9122 266-9123 268-9219 -9220 272-9268 272-9289 
274-9397 276-9495 276-9496 280-9597 280-9598 292-9618 @#@ -9832 0292-9633 
0293-9653 0293-9654 3-9655 293-9657 3-9861 - 3-9870 316-10345 
5320-10515 3286-10655 5329-10699 3353-10759 333-10764 335-10794 %335-10799 339-10850 
35346-11100 5346-11105 5346-11117 #346-11127 346-11128 3486-11129 3486-11130 3486-11131 
35346-11144 5346-11153 5356-11392 356-114 -11 362-11506 362-11524 #362-11525 
35367-11641 3735-11745 3735-11747 373-117468 375-11791 375-11796 375-11804 375-11805 
3375-11852 3786-11924 378-11943 360-11 3860-11974 -il 38682-12013 385-1 
406-12707 406-12730 406-12740 410-12795 411- 413-128693 419-13113 439-14065 
439-14077 0439-14076 439-14080 441-1 $43-14129 4435-14138 443-14140 4435-14143 
445-14156 445-14165 445-14176 0445-14177 447-14211 447-14234 447-14238 447-14241 
4550-14340 450-14341 450-14349 450-14357 4511-14363 451-14368 451-14374 451-14378 
4635-14682 4635-14706 463-14721 470-15014 470-15033 
18-1100 0106-3967 153-5472 0153-5475 0153-5478 0183-7034 0183-7050 183-7053 
‘ 179-6855 179-6862 0208-7571 0227-8083 0227-8090 
#1861-6964 0161-6968 181-6970 181-6976 0181-6993 
€292-9622 292-9623 292-9629 292-9830 0292-9635 
- 3- €293-9860 0293-9865 
@346 -11164 0406-12693 €406-12696 #406-12700 
$4 36 - 1 549 0436-13999 0436-14002 0436-14003 
436 - 14014 0436-14018 €4386-14019 0436-14020 
0436 - 14030 0436-14034 0438-14035 0438-14038 
38 - 14048 @436-14050 0438-14053 0438-14054 
0441-14096 
170-6376 €208-7541 240-8498 242-8527 
3373-11751 375- 11612 375-11849 375-11904 378-11955 
166-6170 169-6315 v4 164-7 
190-7211 on. Tee) #i%%-7276 0196-7315 01986-7353 
32-82 S@-8275 9240-04 @242-8523 0244-8587 
0348-11175 oii. 1283+ 4414-1 €463-14677 
171- 177i -G4:4 27° -€428 208 - 7556 
14-900 #106 - 3966 155-5614 163-5965 165-6374 L€ 6200 -627 170-6376 
171-6452 179-6903 166-7139 2086-7541 206 - 7567 208-7595 210-7679 210-7687 
240-8498 242-8527 244-8591 248 - 6681 2468 -86710 MH -BTL4 250 -8747 3113-10307 
3286-10674 329-10698 333-10768 335-10803 %339-10853 339- 10862 340-10900 5340-10916 


ee ee ee ee ee 


4635-14722 
155 -5596 


4351-14362 
@380-11973 
@333-10761 


244 -8591 
382 - 12025 


@200 - 7396 
@333-10757 


171-6387 
227-8156 
316-10376 
342 -10947 


164-6163 
169-6557 


455 - 144861 


@335 -10796 
0236 -8394 


0438- 14058 


248 - 8681 
4415-12955 


@202 - 7436 
03335-10769 


346-11072 


CZ™SO0 


CREATED Br 


MACRO CROSS REFERENCE 


MACRO NAME 


PROCE D 
PUSH 


SETB 
SET4 


SMACIT 





0367-11654 
#1 -300 


MACRO ON 14. 


5350-11219 


441 -14106 


124 
457- 14514 
#106 - 3962 
#145-5313 
#160 -5797 
0369-11669 
0108 - 3961 


JAN-862 AT 17:31 
SE 


3550-11245 


#171-6595 
@242 -8527 


0448 -14274 
0472-15161 


#385 - 12082 
151-5461 


4357-14528 


#145-53515 
#160-5615 
@371-11711 


106 - 3996 


350-11257 


#155-5590 

#179-6871 

0244 -86591 

@333-10751 
#350-11210 
0365-11591 
@378-11920 
0410-12766 
0415-12955 
0457-14511 
€472-15212 


161-5891 


147-5361 


4586-14552 


#145 -5522 
#160-5626 
@373-11750 


PAGE 
396 
F 


vol 


3554-11359 
3371-11697 
3735-11812 
4135-12875 
4115-12955 
4457-14518 
4700-15028 


#155 -5614 
#166 -7137 
0246 -8681 
#335 -10786 
#350 -11249 
@371-11691 
@376-11955 


0473- 15275 


164 -6160 


147-5363 
166-6279 
206 - 7504 
238-8449 
266 -9114 
333-10760 
3556-11419 
375-11839 
445 - 14160 
461 - 14637 


334 -113550 
3371-11712 
375-11849 


382 - 12025 
4135-12681 
415-12975 
457-14531 
472-15185 


#163 -5965 


@371- -11712 

#3860 -11961 
#411-12809 
0417-12994 
0456 - 14549 
0474 -15302 


166 -6220 


153-5473 


37868-11939 
445 -14162 
461 - 14649 


356 -11441 
3371-11727 
375-11657 
384 - 


458 - 14556 


e354 
@373-11735 
0362-11991 
#411-12815 
0417-12996 
0461 - 14636 


367-11658 


153-5476 


445-14171 
461-14655 


362 -11541 
3373-11739 
3375-11900 


364 -115753 
3373-11751 


-14685 
ava- 15317 


166-6200 166-6265 
@206-7563 210-7622 
@250-8716 3135-10284 


@340- 10866 @ 
344 0356-11376 #362-11541 


340 - 10891 


0373-11751 #375-11785 


0362-12025 


0384 -12032 


0411-12823 0411-12629 
0419-15069 0419-13073 
0461-14652 0463-14670 


367 - 11662 


153-5479 


179-6948 


382 - 12009 
4455-14173 
461-14655 


369-11674 


153-5484 


356 -11437 
384 - 12045 


145-5541 145-5355 151-5454 154-5504 6154-5506 
160-5656 0161-58735 165-5925 164-6144 166-6181 


565 - 11596 
$73-11770 
3375-11903 
$91-121533 
414-12912 
419-13135 
4635-14704 


#170-6576 

@227-86126 

@316-10331 
0342-10928 
0364-11557 
@375-11812 
#406 - 12708 
0411-12832 
0419-13074 
0463 - 14688 


369 - 11686 


1535 -5486 


384 - 12049 
445-14197 


#154 -55068 
0360-11485 





0147-5374 
#155 -5606 


#149-5598 
#161 -5866 


0149-5427 
#163 -S894 


#151 -5450 











CZ™SD0 CREATED 6Y MACRC ON 14-JAN-82 AT 17:31 PAGE 51 
SEQUENCE 597 
MACRO CROSS REFERENCE CREF vOl 
MACRO NAME REFERENCES 
SUBTST 0119-4544 0144-5272 144-5290 145-5310 147-5360 
0155-5466 6154-54693 154-5500 0155-5575 155-5595 
179-6602 161-6952 163-7029 164-7106 0166-7172 
#206 - 7508 
tf 
0304-1 @304-10069 #304-10087 #304-10100 #306-10108 
os 10277 #315-10265 #514-103510 #316-103350 #316-10382 
-1 @346-11097 #350-11203 #550- 3352-11261 
0358-11456 @356-11464 0356-11468 #360-11475 #362-11504 
0367-11651 0369-11666 #371-11690 @373-11732 @#375-11784 
: 384 - 03864-12052 #384-12059 #365-12078 
6406-12747 0415-12952 0417-12979 0439-14063 0439-14075 
0470-15002 #470-15027 
SUPER 01350-4617 0246-87035 0411-12812 0414-12909 0415-12956 
TESTAR 151-4660 166-6210 166-6227 166-6244 166-6270 
250-8736 329-10707 362-11542 371-117135 5373-11753 
406-1275 
THEN 66 -6900 #106 - 3964 
THRY 11-4400 108-3965 
TO 10-2900 6108-3965 
TYPDEC 125-4669 161-7004 181-7006 181-7012 161-7016 
35360-11961 457-14505 
TYPE 115-4445 0154-5497 0154-5510 154-5512 0154-5514 
1 #161-7015 
0316-10341 
0316-10369 
0464 #320-10491 @ 
0365 - 11584 
664 03571-11693 0371-11694 
0373-11765 @373-1177S @375-11767 
0375-11619 @376-11931 0378-11948 
@382-12000 © 0384-12033 0364-12042 
0369-12119 0391. 12131 
0453-14438 0453-14445 
0458-14583 #456-14565 
@465-14710 0463-14714 
0468-14951 #468 - 14952 
0470-15019 0471-15065 
0471-15126 €472-15189 
TYPOCS 371-11716 3735-11767 
TyYPOCT 0453 - 14416 0457-14499 04635-14679 6463-14694 
UNTIL #106 - 3985 
UNTILB 18-1600 108-3967 
USER 0150-4838 3486-11167 3550-11226 5352-11285 352-11301 


#362 -11515 
@376-11915 
#385 - 12098 
0441 - 14066 


0417-12997 
171-6390 
3373-11771 


181-7020 


#154 -5521 
#181-7017 
@316-10349 
#316 -10370 


® 
#306 - 10165 


@339-10841 


0354-11329 


@362 - 11540 
@378-11919 
0387-12112 
0441-14105 


210-7625 
406 - 12695 


181-7022 


#154 -5526 
#1861-7021 
#316-103535 
#318-10395 


0502 #320-10514 


-1 
0365. 11594 
@371-11719 
0375-11788 


0471-15098 
@472-15191 


3735-11776 
0465 - 14696 


4111-12606 


0365 - 11599 
@371-11723 
0375-11797 
#380 -11967 
0384-12053 


0472- 15192 
380 -11978 
0465-14709 


414-12915 


9339-10656 


0389-12118 
0443-14112 


240 -8499 
406 -12711 


166-7131 


@154 -5527 

#181-70235 

0316-10354 
0318-10396 
#320 - 10524 
#367 -11630 
@373-11735 
@375-11601 


0472- 15193 
457-14537 
6463-14711 


0296 - 99568 

#311-10231 
@340 - 10865 
@356 -11554 
#365 -11579 
@362 - 11990 
@391-12124 
0446 -14271 


242 -8547 
406 -12721 


380 - 11964 


#160 -5865 

0186-7126 

#316-10355 
#316-10400 
#320 -10532 
#367 -11660 
@373-11736 


0457 - 14515 
0465 - 14689 
@463-14729 


968 0466-14977 


@471-15115 
0472-15248 


4457-14545 
0463-14724 


0461 - -14630 


244 -8595 
406 -12741 


380 - 11966 
179-6864 


320 
0369-11671 
@373-11759 
@375-11816 


962 @362-11995 


#385 - 12085 
@451-14385 
0457-14519 


0471-15118 
0472-15250 


456 - 14584 
0465-14726 


CZ™S00 


CREATED 8 


MACRO CROSS REFERENCE 
MACRO NAME 


REFERENCES 





MACRO ON 14-JAN-62 AT 





#108 - 3961 


17:31 PAGE 32 
SEQUENCE 396 
CREF vol 

292-9831 293.9852 293-9889 
210-7680 210-7688 246-8674 
144 -5290 145-5310 147-5360 
154 -5500 155-5575 155-5593 
1863-7029 164-7106 1886-7172 
204-7443 206-7488 -7508 
219-7900 219-7936 219-7954 
225-8044 225-8052 225-8060 
236-8376 238-8447 240-8492 
252-8761 252-8772 252-8784 
260-8893 262-8936 264-8976 
284-9667 268-9741 -98611 
304-10087 304-10100 306-10108 
314-10310 316-10330 3168-10382 

-11203 -i 352-11261 
356 - 11468 -114 -11 
371-11690 3735-11732 375-11784 

- 384 - 12059 - 
417-12979 439-14063 4359-14075 
503-16203 
164-6133 166-6170 169-6318 


184-7075 


3468-11120 


3562-11540 
3786-11919 
387-12112 
4411-14103 


184 - 7092 


2968 - 9950 

310-10185 
339 - 10856 
354 - 11342 
364 - 11550 
380 - 11960 
389-12118 
443-14112 


990 
3391-12124 
446 -14271 


